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De redactie = 
do, 





at er vanuit dat de ingezonden copy aemaakt is 
rde inzender tenzij uitdrukkelijk anders 15 vermeld, 

De aansprakeiijkheid betreffend de Auteursrechten voor indezon- 
den copy ìigt den ook voliedig bij de inzender. 
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Hier ligt dan het eerste nummer van na de vakantie, Ik hoop dat 
iedereen een fijne vakantie heeft gehad naet.veel zon, goed weer 
en veel ideeen voor de computer. 

Degene die een 80-EOLOP ART hebben besteld, die hebben hem 
ondertussen in huis gehad. Er waren ook eem aantal bestellingen 
die gebouwd en getest moesten worden. Dit is ondertussen ook 
gebeurd en zij werken nu, als:het goed is, tot hun tevredenheid 
met 80-kelommen op hun ATOM. 

Als je eerst een demonstratie van de Kaart wil zien, informeer 
dan eerst een bij je regio ef iemand al met de kaart werkt. Ie 
dit niet het geval, vraag dan of de regio kantakt met mii op wil 
nemen, zodat re een leen exemplaar voor een regioavond kunner 
krijgen, waardoor op die bijeenkomst een demonstratie van deze 
schitterende kaart met zijn vele mogelijkheden, gegeven kan 
warden. Nu is het woord aan de software mensen om te zorgen dat 
de mogelijkheden van de art optimaal benut kunnen gaan worden. 
De eerste aanzet hiertoe is er al ín de vorm van een nieuwe 
tekstverwerker. Als iemand hiervoor een goede raam weet, laat het 
dan even weten. 

Hiermee komen we aan een tweede punt waarmee ik in mijn maag zits. 
ni. een softwarecomnissie. 











is het geval 
e ATOM is uitermate geschikt om machinetaat programma's te 
schrijven en dat wordt dan ook zeer ruim gedaan. 

Maar daarmee treedt dan ook direkt probleem op de voorgrond. 
al. er zijn geen afspraken en iedereen gaat wat dat betrefd zijn 
eigen gang. 

VOORBEELD : er zijn diverse commando s geschreven die het beeld 
scherm schoon maker. Meestal genaamd CLS, maar op verschittende 
manieren werkend. à& voorbeelden 5 

1) JSR #FD69;RKTS 












2) LDA @EPiLDX Slazslld LDY BE 
ENE LLO:LDA E50 IJEK HFESZIRTS 


ili JSK HEESZEDEYs ENE LLt;DEXg 





Gloss LOY & 
1d5R HEFFAGRTS 


2) 


ENE LLOsLDA @7 





Ll JSR HFFFA:DEYABNE Lig DEXs 








4) LDA @IZGJSR HEFFAGRTE 


De eerste methode zet het beeldscherm in clear 8 en zet dan in 
het gehele scherm spaties neer. 


De tweede methode laat de clear ongemoeid, maar maakt wel het 
ctear @ scherm schoon. Frobeer deze CLS maar eens in GRMOD, dan 
wordt het scherm een lekker zact je. 


De derde methode werkt prima voor beeldschermen van le regels met 
32 tekens, dus cok voor GRHOD, maar bij VDU 40/24 gaat het mis. 
Hier wordt in teder geval wel at gebruik gemaakt van de vectoren. 
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De vierde is de enige juiste, karaktercode 1e geeft aan dat het 
scherm schoon gemaakt moet worden en elk soort beeldscherm 
besturing behoort een afhandelings rautzne voor deze code te 
bevatten. Het werkt dus ook op de ATOM-80 kolomskaart, maar ook 
op die van Elektuur en op de reeds hierboven genoemde routines. 


Dit is maar 1 voorbeeld van software probiemen die op kunnen 
treden bij nieuwe hardware ontwikkelingen. Daarom zal ik op de 
algemene vergadering cok voorstellen om een software commissie in 
het leven te roepen die zich o.a, met dit soort problemen en het 
testen van nieuwe boxen, statements en machinetaalproaramma s zal 
bezig houden, Als er geinteresseerden zijn, dan hoer ik dat 
graad. Want nieuwe hardware die niet zondermeer met oude basis 
software (utitity sj werkt, doordat de software niet geheel 
volgens de regels in elkaar zit, dat kan niet. ve eerste taken 
zullen dan ook zijn het centrateren van de bestaande uitbrei 
dingen en het opstellen van een richtlijn waaraan dit soort 
prearammatuur behoort te voldoen. Taak omschrijving rai door de 
ALV verder bepaald worden. 





DRINGEND VERZOEK: 


Het. gebeurt regetmatia dat het hootdbestuur thuis wordt gebeld 
door leden, dit is een logisch gevolg van het teit dat onze namen 
en telefoonnummers voor an AUM NIEUWS staan, maar als je op een 
avand 18 telefoontjes krijat, dan wordt het voor de andere 
huisgenoten ook weleens vervelend. Waarom maar weereens het 
verzoek om je vragen via Je reuio beantwoordt te kei joen. 

Maar het kan ook zijn dat dat niet Lukt ‘meestal wel), bei dan 
alleen de persaon die in ATOM NIEUWS daarvoor vermeld staat en 








als deze geen gehoor geeft, probeer het dan nog eens op een ander 
tijdstip. Bel het liefst tussen j en B uur en niet onder het 
eten. 

Wat ook vaak voorkomt, 1e dat mensen met vraagen komen dre zm Al up 
NIEUWS al zijn beantwoordt, maar dat ze de moeite niet nemen om 


artikelen, die door het bestuur qeschreven zijn. Le lezen. 
Vooral vragen over bestellingen komen reqetmatieg waor, dan bli rit 
dus das ze de bestelling een week ervour de deur uit hebben 
gedaan, maar zelf de atschrijvina noa miet eens binnen hebben. 
Als een bestelling 14 dagen na het binnenkomen van de 
afschrijving naq niet binnen 25, kijk dan eerst in het clubblad 
of het wel voorradig 1stmet alieen op de eerste blatzi ide 
kijken) en als dat qebeurd is, ga dan eens naar de ctubwinkei 
bellen. Ô 

Kij voorbaat dank vaor de medewer kare. 

















ALLE CLUBWINKELARTIKELEN LJH WEER HIEMSLHUUIS VundkResds Lig, 000 


De Voorzitter. 
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GE ANMN A 








Heeft u ouk wel vens die problemen Hij he 
etalten, dat na vier keer epaeteld 





verschiliende witkamnsten oplevert. Ne 













prebleen, waarbij een rekenmachine met 
i it dan is het mogelijk om alte 






Les 





. Maar bezit ik niet, Mijn ged daan 
naaf de ATOM dit prebieen wit per. 
Jitprinten wan dc tal leem t geen 








semen, En 


ar dees boe 


printer bezit: dus alles a 


kele avanden achter de computer te 





or 





eni 




















tenslatte 


45 


nt ze duist 
krijgt u ctaal. Met di 

len invoeren. Deze getallen 
talten kunnen 





pragr emma kun 





kunt. L 
valat 


zeherm 
al lever wer den 


. . Dit irdkt 








wverin 
meid Er 
u invoert, Met 
mar ita 
nen 
mededeling zal 
r_ dan 


Ais het pragratma w 


infarmatie, tin 





immer 











tal oret 





Ot ut 2 tn Bam, Bit 
scherm 


t/m EZ en 















ge amm 
kalemmen met de munmer 





verschi d 














53 t/m 45. er deze nummers warden ingevoerde 
bedragen (of tallen) afgebeeld. verschi int 
de tekst: Alle bedrag KI af RO. en heeft 
gekontroleerd en ze zijn : 3 toets C3 tuf 





oven in 
u due 





returnì. Als 
beeld komt de te ged. 
het nummer er steat. Ma ap return 
gedrukt te . Hier vult u 
het nieuwe bedrag in. schrukt te heoben wardt het 
foutieve bedrag wver het nieuwe. Gpnieuw verschijnt 
de tekst: Alle bedragen HJ. Pu kunt u dus weer zen 
bedraa veranderen als dit nodig kunt u bedragen toevvegen 




























als ef een of mer verge zijn. dan bij de tekst: Welt 
Dummer is miet vaar het een lgernde lege nummer. Een 
ander nummer dan de Le wardt niet geaccepteerd. Na op 








return gedrukt te hebben kunt u het nieuwe bedrag weer invoeren. 
Deze wardt dan aan de lijst toegevoegd. Veranderd u tijdens het 
wijzigen van gedachte en wilt u ts veranderen, vul dan 
niets in (geen nummer af bedrag) nep return. Dit 





vi 
druk gevo 
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brengt u dan weer terug bij de tekst ‘begragen oke’. Er wordt dan 
dus niets veranderd. Wanneer u kiest vaar 'J' krijgt u het totaal 
netjes ap het scherm afgebeeld. 


Voor dit programma is nodig: geheugen tut #3C@4 em de complete 


CX-schakelsoft met de CX-2,7 (i.v.m, de statements ‘cursor’, 
‘cls’, ‘cap’ en ‘caf ’). Oak is de F-charme noodzakelijk. Hiervan 
worden de statements ‘an error’, ‘inkey’ en ‘beep! gebruikt. 


Ik hoop dat het pragramma bij iedereen naar behoren werkt, Macht 
dit toeh niet zu zijn neem dan even schriftelijk of telefonisch 
kantakt met mij ap. 


Piet van der Zalm 
Kokkel 13 

2281 VD Nuardwi jk 
Tel. 91719-13076 


1 PROGRAM TOTAAL 
5 DIM G652,FFS52,AA1,EB1; A=#8300; 
18 G=8; tA=#23202820; D=HEGAIJ DIM CljP= 
29 CLS: 7#E1=DiP. "BEDRAGEN INVOEREN, MAX. 45" “GEBRUIK DE * 
25 P. “PUNT ALS KOMMA," " (B=STOP) "; CURSOR20, 8; P. "IN TE VULLEN” 
34 CUKSOKZS,F4P, UNK" 
32 ON ERROR GOTO 2000 
35 DO 
48 G=G+13 CURSORZ6, #3 P. Gi: CURSORD,S; FIN. XG 
45 FIF XG<® G. 2000 
47 FIF XG>9999 G. 2090 
58 GOS. 1 
7® IF G=44 CURSORB, 15: P. "LAATSTE BEDRAG! !”; BE. 58,50; BE. 35,75 
80 !D=!A;D!4=tAjP.S1I1S15 
90 U.6=45 OR 4G=0 
1BOMCLS; D=#BB21; B=®; !'A=#2020B17F; T=ljE= 1; 7HE1=G 
118 DO 
128 D:B=!A 
132 B=B+32; T=T+1; AT=T 
148 ?#8301=#8501+1 
158 AY=4T/18 
168 FIF ZT=E G.c 
178 G.ú 
188cIF ?A=127 GOS. a 
198 ?A=?A+); HBIDI=HBOIESE SN 
28AdIF T=16 OR T=31 GOS.D 
218 U. T=46 
258 X=6sY=l;2=0 
248 IF G=45 G.g 
278 FOR I=1 TO G-! 
289 Gn 
29OgFOR I=l TO G 
Z2OnIfF GGI<IG Ge 


F.1=0T. 2; AAI=0; BBI=GiN. 
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GGI< 108 
GGI<1002 





=Z 
P=ì G. 380 

I=16 OR I=51 GG 
288 CURSOR X,Y;P.GGI, 
398 IF FFI=0 P. ';IF P=D G.1 
395 IF Pel AND FFI=D 5. à 

395 IE FFI<I8 P, "0 
408 P,FEI 

495 IF P=1 6.3 
418iYeYeig 12=4 
A15 IF I>iS X=16 

Alb IF 1230 x=2e 

418 IF Pel G.s 

A28 NI 
250)F.S30"ALLE BEDE 
AES KIF k=78 6,442 
456 ELSE G.k 

340 GOS. 3 

JAZZ ON ERROR GUIG 2:40 
444 S= 

A45 GOS.niP. “WELK 
447 IF Gel OR Gr 
458 GOS. 
452 FIF 
455 
454 
455 












ORE NJ OF ON? zg INEEN 

















45 








ABAD AAL= AAi+GGIi BEI=HEi F 
485 A AAL+BBI/ 100: BE1 BEI 





493 S:CURSUK 8,7 

502 = „“TOraaL = NAALT, 

513 IF BBI=D P. =";6: 708 
548 ff BHi18 P,O, BaliG. 700 
558 FP, BBI 


708 £.50; CON END 
1900 "A=REUG RK, 
105doB=0; 






1160 if Pz EN CURSOR ZiSiP. 
1178 RK. 
128ONF, 50 





SOEE “IN. GiL=b 


IF KGS. GL 
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1318 IF L>iS Yet 15 
1528 IF L>54 v=t-350 
1558 R. 
1400sx= 
1448 Cu 
1420 Ff. 

1458 X=X+5 

1440 Gn 

2008 CURSOR B,154P,. "ONJUISTE INVOER!" 
2805 BE.50,75 

ZeI8 G=G-1 

2028 GOTO 55 . 

2108 BE. 18,5G7G= IG. 440 





LAAT EENS WAT VAN JE HOREN. 


Elke soort copy is welkom, of 
K het nu uiterst eenvoudig is of 
zeer gecoapliceerd. 


k Kun je er zelf geen verhaal bij 
bedenken, neen dan eens contact 
op ast iemand van de redactie. 


Zorg dat Uw naam cok eens op een 
andere wijze als in de 
ledenlijst in Uw blad voorkomt. 


BE EN NOGMAALS VOOR DE ZOVEELSTE 
KEER: 


HET IS UW BLAD 


1 ZONDER COPY GEEN 





eN ew : 


NORUIS G.HAMMINK AIOM NIEUWS FAG. IL 





Met dit programma is het mogelijk om in elke clearmode ruisvrij 
te plotten. 

De oorspronkelijke routine is afkosstig uit het Elektuur-boek, 
maar deze had het nadeel dat deze alleen in claer 4 werkte. 

Door nu eerst te kijken welke mode er gebruikt gaat worden is 
dit ondervangen. 

Voorwaarde daarbij is wel dat u een verbinding hebt tussen 
pootje 17 (Pb7) va de VIA en pennetje 9 van PL4, 

Ikzelf heb pootje 16 (Pb6) genomen omdat pootje 17 gebruikt 
wordt door MJCOS. 

Als U dit gedaan hebt blijft het scherm ruisvrij in elke mode. 


6. Hammink . 


10 PROGRAM NORUIS 


30 REM G.HAMMINK EDE. 

35 REM DIT PROGR. TEST WELKE PLOTMODE ER GEBRUIKT WORDT, 

40 REM WAARNA ER RUISVRIJ GEPLOT KAN WORDEN, ZONDER DAT DIT 
50 REM VEEL LANGZAMER GAAT. 

60 REM ER MOET EEN DRAADJE LIGGEN TUSSEN POOTJE 16 VAN DE VIA 
70 REM EN POOTJE 8 VAN PL.4 

BO REM IN REGEL 220 WORDT DE PLOTVECTOR VERANDERD. 


110 DIM LLS5;P=#2800 

120 P.$2i 

1350 FOR E=t TO 2;605, a; N. 
140 P.$4 


166 REM VOORBEELDPROGRAMMAAT JE z 

170 CLEARA;LINK#2800 

180 MOVE125,80 

190 DRAW(A.R. 2256) „ (AR. X192) 

206 G.180 

210 END 

220at 

230 LDX@8F7; STX#B1 

240 LDA#BOOO; CMP@#FO; BNELL 1 ; LDX@NAA; STX480; IMPLLS 
250:LL 13 CMP@HBO; BNELL 2; LDX@86D; STX#BO; JMPLLS 
260:LL 2; CMP@#7O; BNELLS; LDX@RS4; STX#BO; JMPLLS 
270: LL 5; CMP@#SO; BNELL 4; LDX@#3B; STX4BO; IMPLLS 
280:LL 4; LDX@HE: TX#BO;: LDX@ERF 6; STXHS1 ; JMPLLS 
290: LLS; LDA@#1C; STAKSFE: LDA@#02; STA#3FF 

300 RTS 

3101 

320 P=$21C 

330L 

340: LLOLDA#BBOO; CMPERFF ; BEGLLO:s JMP (#80) 

350 RTS 

3601 

370 P=#2300 

ZBO RETURN 
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Er zijn joysticks met een automatische vuurknop en er zi in 
dus atomisten met zo'n sovstick. Voor deze mensen is dit artikel 
dus absoluut niet interessant. 

Vaor alle andere atomisten die ook wel eens een spelletje 
willen spelen,en zich daarbij nogal ergeren aan de traagheid van 
hun duim is de volgende schakeling een uitkomst. Deze schakeling 
produceert om de zoveel tijd een puls, die door de Atom wordt 
opgevat als een druk op de vuurknon. De duim kan nu rusten, 
terwijl wij high-score na high-score breken. 

Deze schakeling is zo eenvouding en compact van opzet dat zi 
geaakkenlijk op een gaatsesprint kan worden opgehouwd Oom daarna 
in de joystick te woroen gemonteerd. Er moet dan wel een extr: 
+5v leiding vanuit de computer worden aangelegd. Dok is het wel 
handig om een schakelaar aan te brengen omdat anders de vaurknop 
niet meer stopt. 

Nu het schema. alles draait hier om IC} zen NESS55, hier 
geschakeld als een monostabiele vinrernor. Me frequentie word 
bepaald door R1,Pi,li, met de gegevan waarder ìs een leu: 
resultaat te bereiken. Als de Schakel:ng te anal of te tang:aam 
iz, bijregelen met Pz. UIT gaat naa” ve comctter NA de UU 





Onderdelenlijst: 

Rl 100K 

Pl 1OOK - IM (naar behoeftà 
Cl IuF 

C2 IOuF 

IC NES555 
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1 
Len) 









MP#B7 ; BCCKK7 
“Slagt *; STAAB2 ; LDALL3B; STi AB3; LDYEO 
210:KKO LDA#BBOO;CMPE 192; BCCP+4 ; LDAE191 

220:KK4 PHA 

230NSTART CONVERSIE 1 

240 LDAECO; STAABBSOC ; LDAE#EO ; STAABSOC 

250NUNPLOT OUDE DATA 

260 LDA(#B2) „Y; TAX; LDA#3A00 „KX; STi fB 5 

270 CLC;LDA#3900,X;ADCHB1; STAAL4 

280 LDAÁ80;EOR(#54) ,Y;STA(#B4) ,Y 

29ONPLOT NIEUWS DATA 

300 PLA;STA(#B2) ‚Y; TAX; LDAf3A00 ,X; STAAB5 

310 CLC;LDA#3900 ,X; ADC#E1; STAAGA4 
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FASTPLOT W‚SALDEN 





320 


LDa#5O;EOR( #34) ‚Y 





(A4), 


330 LSR#BO; BCCP+ 14; LORAGI; LD. ABS; ADCÁ 1; NDEÁTF ; STAÉE t; BCCKK 1 
340\WACHT SNELHEID SYZIGEN ? 


350 
360 
370 
380 
390 
400 
410 
420 


NOP; NOP; NOP; NOP; NOP; BIT BOU 1; BYSKK 1; EPLP+6 

INC#88 ; BNEF+4 ; DEC #86 ; BkQP-6 

LDKE15; JSRÍPBB3; BITABCC 1; BVCP= 1e 

:KK1 LDX/3e 

:KK3 LDA#ROO1; ANDE#10 ; BREP+3G; RTS; DEX; BNEKK 3 

INC#82 ; BNEKKC 

:KK2 BIT/BOO2;BVCKK2 

JUPKK6;\ KK9 ZONDER TRIGGLRING (BV GELIJKSPANNING) 


4305; N.; TP. 86 




































440 IN."SNELHEID 1-256 "S,"TRISGERNIVESU 1-190 "T 
450 2#03=8; 7/07 
460 P.''t-REPI- ZET BELLD STIL"!H-CRTL= VERLaAGT SNELALID"! | 
470 P."-SHIPT,CRTL- VERHOOGT SNELHEID"! 
480 P."G=RES "'! 
490 P."DRUK OP Een wOaIS" 
500 LINKÁFE4 
510 CLEAR4;LINKKK9 
520 P‚F=f3BOOTOA3COG 5.4; 1F=OGN, 
540 P,y12;G.440 | 
55 250 ef 
& 
| 
„B-bit resolutie: 
A “over any utsirud 
tapsesl input 
7 enen range 
Fin 1 non 
pin 2 hi 
pin 3 CBZ stertrulis 
pin 4 van pin 12 van T&LS% ; pin 14 Var aan vicek „ib 
pin & NC 
pin 6 HPU 
pin 7) IKPUE 
pin & "on 
pin 9 ef. È2r Volt ze 
pin 10 
pin 11t/m15 goert B 
sin 19 JC 
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Daar ik dagelijks te maken heb aet de ontwikkeling van 
programmas voor dataverwerking via mappen onstond bij mij de 
behoefte om deze mogelijkheid cok op de atom te creeren. 

Een map is een verzameling van kommentaar en datavelden die men 
geliiktijding kan opvoeren of wijzigen waarna pas terug de 
kontrole aan het hoofdprogramma wordt teruggegeven. 


DE VOORDELEN van het gebruik van mappen zijn: 
—senvaudigere en snellere dataentry doordat men de return 
toets niet meer hoeft in te drukken. 
—beter overzicht over het geheel van data. 
—makkelijke korrektie (skip terug). 
=eenvoudig wijzigen van bestaande gegevens. 
Het nadeel is dat het definieren van het scherm meer prograaatie 
vergt saar het hoofdprogramea wordt iets eenvoudiger. 


Het mappen van schermen wordt verkregen doormiddel van het 
"enter" statement in kombinatie met een bepaalde manier van 
programatie in basic. 


A) HET ENTER STATEMENT moet toegevoegd worden via de p-charm 
uitbreiding en dient ter vervanging van het input statement. 
Formaat: ENTER X,0 
=x kan eenderwelke string (a -z) zijn, maar dient van te 
voren geïnitialiseerd te worden vb $a=" ". 
Het enter statement zal de lengte berekenen van de string en 
zal letters en of cijfers toelaten totdat de lengte 
bereikt is id 
—de parameter na de komma duidt aan of de data numeriek of 
alfanumeriek moet zijn, O = alfanumeriek en 1 = numeriek 
(O-J en — teken). 
Wanneer men een letter in een numeriek veld tracht te 
brengen zal dit niet mogelijk zijn en zal er een pieptoontje 
te horen zijn 
Het enter statenent geeft de controle terug aan het programma : 
=indien data over de volledige lengte van het veld geenterd 
werd 
—als men te kennen geeft dat men naar het volgende veld wil 
skippen door de J-toets in te drukken 
—als men terug naar het vorige veld wil springen [-toets 
=als het scherm volledig klaar is en men wenst de verwerking 
te starten doormiddel van de return toets. 
De geheugen locatie #92 zal de waarde van de laatste gebruikte 
toets bevatten. vb if ?$92=ch"[". 
OPMERKING: daar het enter-statement net strings werkt en niet 
met variablen moet met deze eerst omzetten indien nodig.0a een 
string om te zetten naar een variable kan men het statement VALS 
gebruiken terwijl pmen set het statement STR van een variable 
naar een string kan gaan (floating-point statements). 


B) BASIC STATEMENTS: Een aantal basic statements dienen voor het 
afdrukken van de strings op het scherm en het controleren van 
het skippen. Met behulp van een string „ in dit geval $h, wordt 
de allereerste skip en de protectie van de velden 
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gecontraleerd.Alle velden op het scherm krijgen een volgnummer 
„namelijk de volgorde dat ze van boven naar onder op het scherm 
gedefinieerd zijn (bijvoorbeeld 1 to 10). 

=In de eerste byte van de string kan men het veldnummer zetten 
waar aen de eerste keer naartoe wil skippen ‘cursor 
positioneren).vb indien het vijfde veld fout is dan H?Oa=ch"5", 
-In de volgende bytes van de string, ín dit geval de tweede tot 
de tiende byte wordt aangegeven of de data in in het 
korresponderende veld mag gewijzigd worden of niet ‚1 mag 
gewijzigd (unpratected) en bij O kan het veld niet gewiizigd 
worden (askip).vb $h"1O11111111" wil zegen dat het eerste veld 
niet gewijzigd mag worden en nu een kosmentaar veld is. 


LAYOUT VAN EEN MAP 


FSOL JOURNAL ENTRIES LUODAT ING 


ENTRY 01001 
CODE i 
SEQUENCE oor 


ACEDUNT NO 01001 
COST CENTER OO 
DATE 010386 
AMOUNT 100 
DEBIT/CREDIT D 
DESCRIPTION TEST 


MESSAGE: ENTER DATE 


UITLEG VAN DE LISTING: 


HET OPROEPEN VAN DE MAP 

3005 — 3020 initialiseren van de strings. 

3025 skip naar het eerste veld en alle velden kunnen ingegeven 
worden. 

3030 zend schera en ontvang scherm terug 

3035 indien Sk foutief is wordt in $f de foutboodschap gezet en 
teruggesprongen neer de map routine. 

3040 het eerste veld wordt nu op "O0" gezet daar dit vaor alle 
volgende records geldt en biigevolg niet hoeft of mag gewijzigd 
worden. 

3045 test waarden van $1 

3050 indien fout zet in $f de foutboodschap en zet de cursor op 
het tweede veld 


DE MAP ZELF 


3505 — 3860 print koenentaar en inhoud van de strings op het 
scherm 


3865 spring naar een specifiek veld indien nodig 

3870 indien er data in het veld mag ingevoerd worden zet dan de 
cursor op de juiste positie en voer het enter statement uit. 
3871 indien de return toets werd gedrukt keer dan teug naar het 
hoofdprogramma. 

3872 indien er teruggeskipt moet worden spring dan naar het 
vorige dataveld (in dit geval het laatste veld op het scherm). 
3875 indien de string voledig werd geenterd ofwel dat men de 
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J-toets gedrukt heeft kom men op deze instruktie. 


DE LISTING VAN DE MAP 


3800 
3805 
3810 
5815 
3820 
3825 
3830 
3835 
3840 
3845 
5850 
3855 
3860 


PROC RT-MAP 


@=1 

P.$12"FS501 JOURNAL ENTRIES UPDATING""” 
P. "“ENTRY "eK 

P. *“CODE es 

P. ”"SEQUENCE “$J 

P. "“ACCOUNT NO "$0 


P. "“COST CENTER “$P 


P. ""DATE "sa 
P_ __7“AMOUNT "&G 
P. “""DEBIT/CREDIT "$T 


P. *"DESCRIPTION "$S 
P. ** "MESSAGE “sr 


38430N (H?0-#30) GOTO3BES, 3B75, 53885, 3895, 5905, 3915, 5925, 5935, 3945 


3865 
3870 
3871 
3872 
3875 
3880 
3881 
3882 
3885 
3890 
3891 
3892 
3895 
3900 
3901 
3902 
3905 
3910 
3911 
3912 
3915 
3920 
3921 
3922 
3925 
3930 
3931 
3952 
3955 
3940 
3941 
3942 
3945 
3950 
3951 
3952 
3955 
3999 


REM ENTRY 1 


IFH?1=CH"1" 5 VTABS;HTAB1 33 ENTERK, 1 


IF 2#92=#0D; 6. 53999 
IF 7#92=CH"[";G. 3945 
REM CODE 2 


IFH?2=CH" 1"; VTAB4; HTAB1 33 ENTERL , 0 


IF ?&92=#OD;G. 3997 
IF ?892=CH"[";G. 3865 
REM SEQUENCE 5 


IFH?23=CH"1"5 VTABS; HTAB1 Ss ENTERJ , 1 


IF ?#92=40D; G. 5999 
IF 7#92=CH"[";G. 3875 
REM ACCOUNTNO 4 





IFH?4=CH" 1"; VTAB6; HTAB1 Sj ENTERD, 1 


IF ?#92=#0D;G. 5999 
IF ?#92=CH"["5G. 3885 
REM COST CENTER 


IFH?S5=CH" 1"; VTAB7; HTAB13;ENTERP, 1 


IF ?#92=80D;G. 5999 
IF ?#92=CH"["5G. 3895 
REM DATE 6 


IFH?26=CH" 1"; VTABS; HTAB1 3; ENTERO, 1 


IF ?R92=#0D;G. 3999 
IF 2#92=CH"[";G. 5905 
REM AMOUNT 7 


IFH?7=CH" 1"; VTAB?; HTAB1 3; ENTERG, 1 


IF ?#92=HO0D5 6. 5999 
IF ?492=CH"["5G. 3915 
REM DEBIT/CREDIT 8 
IFH?8=CH"1 
IF ?#92=#0D;G. 3999 
IF 92=CH"[";G. 3925 
REM DESCRIPTION 9 





IFH?9=CH" 1" 5 VTABL 1; HTAB1 33 ENTERS, O 


IF ?#92=40D;G. 3999 
IF ?#92=CH"E";5. 3955 
6. 3865 

PEND 


;VTAB10;HTAB1S;ENTERT , 0 





HET OPROEPEN VAN DE MAP (LIIT EEN PROGRAMMA GELIGT) 


3000 


PROC RT-DETAIL 
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3005 $k=" mjs "jee" "som" “epe « 
3010 $G=" “zs6=" “STe * 

3015 s5=" hid 

3020 SF="ENTER DATA hel 

3025 SHe“1111111111" 

3030 RT-MAP 


3035 A=VALSK; IFACIORA_129993 SF="ENTRY INVALID"sP.8736. 3030 
3040 H?1=CH"0O" 

3045 IFSLa"I" OR $L="C" OR $Lx"D" OR SL="A" OR SLa"N"5G. 3055 
3050 $F="CODE INVALID";H?0=CH"2";P. $756. 3030 


HET ENTER STATEMENT (P-CHARM UITBREIDING) 
SO4O\r=eneureeernemerermnarn 
5050: CC4\SESENTER& SE 
SOLO\mmreee=reneeeezekeemmenn 
5070\ 
5080 JSRECIBD;LDX@O; STX4;3 LDAN165 STANGO 
5081 LDA#52; STA8IA; LDASS; STANIS 
5090 ISREC2S1 ; JSRECBBC; LDX@O; STXA;LDAN163 STARI1 3 JSRICAEG 
S100LDY8O; LDX8O; STYRFC3 JMPLL2 
S11O:LL1;STX@FD; JSRHFD1A; LDXSFD 
5120: LL 2; STX&FD; JSRHFE43 LDXEFD; LDV&FC; STAR92 
5130CMP@#7F ; BELL 6; CMP@NSD; BEQLLB; CMPRKOD; BEOLLG; CMPQESB; BEULLS 
5135 LDAN?1 5 CMP@O; BEALLS 
5140 LDA#92; CMPRCH"—"; BEGLLS 
5145 CMP@#3O; BCCLL 1 ; CMP@#3A; BCSLL 1 
5180 
LLS; LDA#92; JSR&FES2; STA (#94) , Y3 INV; STY&FC; CPY#90; BEALL 7; BNELL 2 
5181: LL6;CPY@#0O; BEQLL 1 ; JSRRFES2; DECHFC 
S190LDAECH" , “3 CMP8I3, Ys BNELL 23 LDX@O; JMPLL2 
5200: LL7sLDAS#SD; STANI 
5205: LLS; JMP&CSSB 
99981 
JO GERIS 


Zou dit programma 


zoveel hoofdbrekens 


gekost hebben ??! 
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18 
28 
38 
40 
5e 
69 
78 
88 
98 
190 
118 
120 
138 
140 
158 
168 
178 
1858 
195 
220 
210 
223 
252 
2408 
250 
260 
278 
2838 
298 
520 
318 
328 
358 
340 
350 
368 
370 
388 
390 
4008 
418 
428 
430 
448 
450 
468 
470 
4850 
490 
508 
Sië 
520 
530 
540 


PROGRAM SOMMEN 
P.$173F.A=1T048EP." "iN. 
P.$17" Meneer Van Dalen Wacht Op Antwoord”;CLS 
VT.2;HT.73P. "Uitleg J/N";INK.D; IF D=74 GOS. f 
FZ.;Z.3A=18;3B=7;C=68; ON ERROR G.C 

GOS. a; 505. 6; ?#DE=7;5 VT. 65 HT. B; P. "Bewerking" 
P$EL=#703 VT. 63 HT. 18; INK. Ds CASE D OF 

<77> 
<8e> 
<68> 
<87> 
<79> 
<65> 
<8a> G.580 

<69> G.620 

<15> VT. 19;P. “Return”; 
<8B> VT.ZijP. "Printen”;REM DUMP 

<127> VT.B;F.D=1 TO 888;P." ";N.;6.56 
CEND 

5.60 

REM 

GDS, a; VT. PiP. “Machtsverheffen” 

IF D=15 G.260 

GOS. 

GOS. 3 AC=KA“KB3 VT. 95HT. AG FP 
GOS. es LC=HA“KCH VT. 95 HT.AGFP 
REM 

GOS. a3 VT. 18;P. "Vermenigvuldigen" 
IF D=13 G.320 

BOS. d 

BOS. Ci; AD=XAK%Bi VT. 105 HT. Aj FP. Y 




















LD; 6.68 





GOS.es AD=AARAD3 VT. 103 HT. AFP. KD; G. 60 
REM 
GUS.as VT. ti;P. “Delen” 


IF D=15 G. 388 — 
GOS. d 

GOS.Cc; KE=AA/LB; VT. 113 HT. A;FP. ZEG. 6D 
GOS. es HE=LE/KA3 VT. 11; HT. AFP. XE; G. 68 
REM 

GOS. as VT. 12;3P. "Worteltrekken” 

IF D=13 G.448 

GOS.e 

GOS.ciXF=SOR %A;VT. 12; HT.A3FP.AF;G. 60 
GOS. es XF=SOR HA; VT. 12;HT. A; FP. XF; G. 68 
REM 

GOS. a; VT.13;P."Optellen” 

IF D=13 G. 500 

GDS. d 

GOS.c; AG=XA+LB; VT. 135; HT. Az FP. XG; G. 68 
GOS. es AG=4G+4A3 VT. 133 HT. AFP. AG; G. 60 
REM 

GOS.a;z VT. 14;P. "Aftrekken" 

IF D=15 6.568 

GOS. d 


PAG.20 ATOM NIEUWS SOMMEN _ROB DE 


HAAN 





550 GOS. cs AH=XA+AB; VT. 14; HT. A; FP. XH3G. 68 
568 GOS. es AH=LH4LAG VT. 143 HT. As FP. ZH; G. 68 
570 REM 

580 GOS. a; PADE=7 

590 VT.17;P."Totaal";VT.4;HT.B;P. “Totaal” 
608 VT.4EHT.AGFP. ACHAD+4ESAF +46 LH; G. GO 
610 REM 

620 REM Einde 

636 VT.18;P. "Einde"; 28DE=b; PME 1=#30 

648 P:S17;F.A=l TO 4jP." "iN. 

658 CLS; VDU12 

b6B VT-4;HT.10;P. s20s22'e INDE“ 


678 VT.5;HT. S5;P. YE NDE" 
4688 LI. HEFES; vbu4as zhel= RSE. 


690 REM 
78Oa?HDE=S; VT. 2 
718 HT.B;P. "Getal 
728 HT.AzP. rerrmsmmnmtn 
738 HT.BjP. "Totaal 27 
78B HT. ApP, termen 
750 HT.BjP. "Bewerking 
768 HT.AzP. "“"z PHDE=7 
778hP#DE=5; VT. 9 

789 P. "Machtsverheffen 














;R. 








79Ö 'Vermenigvuldigen: ” 
400 "Delen 2” 
818 ‘worteltrekken Lid 
820 "Optellen 2” 
858 ‘Aftrekken 1 





840c ?#DE=S; VT. 17 

858 P. "Totaal" "Einde" "Return" "Delete" "Printen" 
8468 PRDE=T;R. 

87BHHT.A;P 
888 VT.2;HT.A;FIN. ZAG VT. Zi HT.AGP." ii 
B9B VT.2; MT. AsFIN.AB3 VT. 23 HT. Aj P. " 
FAAEHT ,AjP." li 








GIA VT: 2EHTe Ag FEN: ZARVTe AIHT. Ag Pot "IR, 
P2OFVT.1;HT.O 


1 R.ae Haan”! 

: Rotterdam” '” 
Dit programma is gemaakt voo 
‘68 koloms kaart van de FACC. 
“De eerste letter van ieder woord voert” 
"de desbetreffende som of commando uit.” 
‘Behalve RETURN en DELETE dat zijn de” 
"toetsen zelf.” 

"Geeft men een RETURN bij ‘bewerking " 
‘dan gaat men terug naar de som waar” 
‘men vandaan kwam. ””” 

"DELETE maakt het scherm schoon” 
P."Elke som of commando die in gebruik is" 











de" 

















werst verwer af 





HEC AMENEN 1E NIEL 





ze Pen cums 





Hir 
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VIDITEt 


In de datacheck no.3 van 1985 stend een artikel over viditel 
op de atom. Dat was hest leuk, maar waär was het programma ? 
Het programma was er niet. Ik ben aan het knutselen geslagen 
en er is nu wel een programma zodat je viditel op de atom 
kan draaien. Het programma vereist dan wel geheugen van 
#2908 tot #60308 en wil je van alle mogelijkheden gebruik 
maken dan heb je geheugen tot #8988 nodig. Verder is er een 
modem (protec modems zijn nu FLi-75,00) nodig en een kiein 
ZALSI4. Voor zo'n FL.77,68 gulden kunt u dan viditel 
draaien. Er is dus GEEN RS232 poort voor nodig, omdat het ic 
wordt aangesloten op de via. 


De aansluitingen 


Pen 2 van de via moet worden doorverbonden met pen 5 van de 
TALS14. Pen ? van de via moet worden doorverbonden met pen 2 
van de 74514. Verder zijn Fen 14 van de 74LS14 de +5 Volt 
en pen 7 de massa. Als u dit gedaan heeft is pen 1 van het 
ic de data vcutputtvan het modem en pen 4 is de data 
input {van het modem) 

Als u een protec modem heeft dan moet pen 5 (van het modem) 
aan pen 1 

Het modem is aangesloten op de a-poort van de via. Dit 
betekent wel dat het printer-ic in de computer aanwezig moet 
zijn en dan moet de printer ook uit staan. Dit is gedaan 
omdat de axrt-bezitters anders geen viditel kunnen 
gebruiken. U kunt zelf patuurlijk de software veranderen en 
het modem aansluiten op de b-paert, zodat u daar geen 
problemen mee heeft. 





Het viditelprogramma 


Het viditelprogrammá moet u opstarten met *run “viditel”. In 
het programma zijn een paar mogelijkheden ingebouwd die het 
nog aantrekkelijker maken. 


CTRL XO# hiermee kunt u naar de hoofdindex gaan van een 
databank. Dit is meestal de bladzijde vanaf waar u 
naar allerlei onderwerpen kunt gaan zoeken. 

CTRL-2 Het dewnieaden van software. (uitleg valgt nog) 

ETRL-S #90 Hiermee verlaat u de databank. Dit is altijd 
de laatste pagina in de databank. De databank legt 
dan zeif cok de heurn neer PAS DUS OF ! 

CTRL-4 Laat een pagina van disc (#9028-#9600) 

ETRL-S Saved de pagina die op dat moment ap uw beeld 
staat. U kunt deze pagina dan later nag eens 
bekijken of uitprinten. 


CTRL -6 Normaal beeld. U ziet het beeld dan met zwarte 
letters ap een witte achtergrond. 
CTRL-7 Inverse beeld. De eerst volgende pagina die u 


cpruept zal dan met witte letters op een zwarte 
achtergrond warden vertoond. 
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SHIFT-CTRL-i Laad een prikbord pagina van disc en zet 
deze ìn het prikbord. 

SHIFT-CTRL-2 Saved een prikbord pagina voor de prikbord 
editor. 


Het downloaden van software 


Met de CTRL-2 toets is het mogelijk om uit een databank een 
programma te laden en dit wordt dan opgeslagen in uw Atom. 
Het opslaan gebeurt van #6868 tot #89B@. Het is dus mogelijk 
om programma’s van BK te downioaden. Omdat de download 
routine nogal moeilijk in elkaar zit, wordt er niet gekeken 
of er fouten tijdens het overzenden zijn ontstaan. Als u bij 
het keuze menu heeft gekozen voor software dan komt u 
waarschijnlijk daarna weer in een menu waarin u kunt kiezen 
tussen verschillende programma’s. Deze programma's zijn wel 
voor een bepaalde computer bestemd. Er zal (nog) niet veel 
software te vinden zijn voor de Atom (hier kom ik later op 
terug). U krijgt dan een pagina te zien waarop staat uit 
hoeveel blokken het bestaat en bv. TOETS SHIFT F2 om te 
laden. U toetst dan gewoon CTRL-2 in en de computer begint 
pet het downloaden van de software. De computer regelt vanaf 
hier alles, hij bladert zelf verder en saved de software 
daarna op disc. Hierna gaat hij weer terug naar de index. De 
software staat nu dus op disc en is later weer in te laden 
via load "filenaam"2908. 2948 geeft dan het adres aan 
waarop het geladen moet worden. 


De prikbord editor 


Met de prikbord-editor is het mogelijk om berichten die je 
in de databank wilt zetten, te maken voordat je aan de 
telefoon hangt. Hiermee is het dus ook mogelijk om grafische 
tekeningen te maken of teksten te onderstrepen of zelfs met 
kleuren caf met dubbele hoogte te schrijven. Hier komt de 
lijst met toetsen voor de editor, 


CTRL-1 Dubbeie hoogte 
CTRL-2 Grafisch rood 
ETRL--5 Grafisch groen 
CTRL-4 Grafisch geen 
CTKL-5 Grafisch blauw 
CTRL -& Grafisch helrood 
CTRL—7 Grafisch licht-blauw 
ETRL-8 Grafisch wit 
CTRL? Help toets 
SHIFT-CTRL-0 Load oude file 
SHIFT-CTRL-1 Tekst rood 
SHIFT-CTRL-2 Tekst groen 
SHIFT-CTRL-3 Tekst geel 
SHIFT-CTRIL-4 Tekst blauw 
SRIFT-ETRL-S Tekst helrood 
SHIFT-CTRL-& Tekst licht-blauw 


SHIET-CTRL--7 Tekst wit 


SIDIIEL B.RUIGRINK ALOM NIEUWS PAG. 45 





Als u nu een tekst in het rocd wilt hebben dan typt u eerst 
de tekst in en daarna gaat u met (CTRL-isisksh) naar het 
begin van de tekst en u toetst dan SHIFT-CTRL-1 in. U ziet 
dan een teken staan en dat teken staat vaar een 
contral-teken. U kunt dan zien dat er op die plaats een 
bepaald teken staat. Als u in het road door wilt schrijven 
dan moet u aan elk begin van de regel weer zo'n 
control-teken zetten. Hetzelfde gelt voor de grafische 
tekens. Wilt u bijvoorbeeld een streep trekken dan toetst u 
CTRL-5 in vaor grafisch blauw (of een andere kieur) en als u 
daarna op de komma-toets drukt, krijgt u een streepje. Alle 
kleine letters zijn grafische tekens en cok de tekens 
VERELK OA wok. Als u in de tabel kijkt van de 
viditel-karakters dan ziet u precies welke toets welk 
grafische teken vaarstelt. Als u klaar bent met de tekst, 
dan typt u in # (shift-35) en de computer begint de atom 
codes te vertalen naar het viditel protacol. Dit duurt een 
tijdje. Dus wacht dan even, maar denk niet dat hij hangt. 
Als hij klaar is dan komt er onder in beeld een ">" te staan 
en U moet dan de filenaam intypen van het scherm. Als hij 
dan klaar is met saven kunt u viditel bellen (cf een andere 
databank) en u gaat dan via het hoofdmenu rnaar het prikbord. 
Het computer vraagt u dan “vrij af prive bericht”. u typt 
dan t of 2 in en de cursor verschuift een paar regels. U 
druk vervolgens op SHIFT-CTRL-1 en onderaan in net beeld 
vraagt de computer om de filenaam van het scherm dat u in 
het prikbord wilt zetten. De computer laadt de file en zet 
hem in het prikbard. Dit duurt een tijdje (1-2 minuten) en 
dan vraagt de computer of hij het bericht moet verzenden cf 
annuleren. U typt uw keus in en de computer gaat verder. Met 
de toets SHIFT-CIRL-2 is het mogelijk am pagina's uit het 
prikbord te halen en u moet deze dan in de editar vertalen 
naar Atom protacel. U doet dit met CIRL-” en de computer 
vraagt dan de tilenaam. De computer Ieest de file in en 
begint te werken. Als hij Klaar is moet u weer een filenaam 
opgeven en hij saved hem onder deze nieuwe filenaam, Deze 
nieuw fite kunt u dan weer gewoon inladen via SHIFT-CTRL-S. 
Na het intypen van SHIFT-CIRL-G staat de computer weer even 
te rekenen en zet daarna het scherm neer 

In de editor kunt u m.b.v. CTRL-9 kijken wat vaar een 
contral-code er staat op die regel. U verplaatst de cusar 
met CTRL-isi,k,h en toetst CTRL-? in. U ziet onder in het 
beeld verschijnen welke codes er ap die regel voorkomen. 





Het tekenprogramma 


Dit is een los klein programma om in clear@ plaatjes te 
maken en deze weer in de prikbord editer (of in de databank) 
te laden. De toetsen vaar dit programma zijn z 
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Z -— naar Links 

X — naar rechts 

C — naar boven 

{ = naar beneden 

8 — schuin links boven 

W — schuin rechts boven 

A — schuin links beneden 

S — schuin rechts bemeden 

M — move 

t -— inverteer 

2 - wis 

3 - tekenen 

4 — move-draw 

D - draw 

C - cirkel (gags rom nodig) 
SHIFT Q — scroll beeld links 
SHIFT W — scroll oveeld rechts 
CTRL L — laad scherm (#8000-#8200) 
CTRL S - save scherm (#8070-#6200) 
SHIFT S — saved scherm en maak klaar voor editor 


De Atom noemt de file altijd “prpag” 


Na SHIFT-S gaat hij weer rekenen en het kan een tijdje 
duren, voordat hij de file saved. Het scherm gesaved m.b.v. 
(CTRL-i,5) kan niet worden ingeladen in de editor. Dit geld 
ook voor het saven van een pagina in het viditeiprogramma 
m.b.v. CTRL-S. 


MNNKN NNU KAKKEN HE 
«* ONZE EIGEN DATABANK # 
VEEEIRINN KNK KNN EEE KEEK 


U leest het goed: ONZE EIGEN DATABANK. De regio Den-Haag 
heeft een eigen deel in een databank. We mogen in deze 
databank 5@ bladzijden gebruiken (A.Smithuis nog bedankt). 
In deze databank staat informatie over onze Club en er staat 
software in. De hele opzet is nog maar een test maar als hij 
goed bevaìt, kunnen we misschien een programma schrijven 
zodat we dan zelf met de atom een databank kunnen oprichten. 
Als het u goed bevalt, meldt dit dan even in het prikbord. 
Nu komt het belangrijkste .….….. Het telefoonnummer. Dit is 
U7@ (Den-Haag) 891466. U zit dan in de databank van de 
Carolusschoolì in Den-Haag. Atommisten laat dus van u horen. 
Heeft u nieuwe software of andere waardevolie zaken te 
meiden, zet dit dan even in het prikbord. Aìs u nog meer 
telefoon nummers wilt hebben voor andere databanken bel dan 
even 8015-135181. U zit dan in het poseidon systeem (dit 
draait op een BBC en is door ECD gemaakt). In dit systeem 
zit een lijst van telefoonnummers door heel Nederland (en 
daarbuiten), Al deze databanken graaien meestal op een BBC 
met het programma poseidon en geze databanken zijn daarom 
meestal gratis toegankelijk. (ook onze eigen databank is 
gratis). U komt in het deel van de Atom club door #158#% in 
te typen. Veel succes. 
Door :B.Rutgrink (hamburgersoft) 
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Komponentenli ist Enter face 
WEERSTANDEN KONDENSATOREN HALFGELEIDERS 
R1=-R2 470n El 1OnF (ker) Dt-D7 IN4148 
R5 AK7 C2 100nF (ker) 

R4-R12 47k Cs 47uF / 14V 

R135 2ek } T1 BC5S7E 
R14 an2 T2-T5 HCS47B 
R15 IK 

Ri& 4700 

RI7 AK DIVERSEN 1C1 AY-E-1015 
R18 TOK (C2 JALSEGE 
R19 A7K X1 1.8452 Mhz N1-N& 74LS04 
R20 1OK Centronics konnektor N7-N12 CD4050 
R21 47 RS-252 konnektor NIE-NIS CD4050 


In verband met een eventueel ontwerp en produktie van een 
kant en klare print verzoeken wij u in geval van interesse 
kontakt op te nemen met onze penningmeester Theo Waayer. 


Het bestuur. / Regio Den Haag 


GRAFHICSDEMO VOOR HET GAGSROM DOOR R- LEURS. 


Red.: het programma laat goed zien dat men met het GAGsrom mooi 
figuren over elkaar kan tekenen en ook weer laten verdwiinen 
zonder dat het onderliggende figuur wordt aan getast. 


10 REM GRAPHICS VOOR DE GAGS VERSIE 2.0, 2.1 EN 2.2 
20 CLEAR 4 

30 FOR P2O TO 4 

40 PAPER P 

50 FOR B=O TO 500 STEP 2 
60 BORDER B,‚B 

70 NEXT B 

BO NEXT P 

90 FOR X=-100 TO 100 
100 SOUND (A.X),10 

110 NEXT X 

120 GOTO 30 


140 DIT PROGAMMA KAN DOK TOT ONELINER HERSCHREVEN WORDEN 


160 GEMAAKT DOOR R, LEURS 
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TELEFOONKLAPPER 





Dit programma is bedoeld om namen met de bijbehorende te- 
lefoonnnummers op te slaan. Met behulp van dit programma 
kunnen we nieuwe namen en telefoonnummers toevoegen, wij- 
zigen ot verwijderen. Verder kan er uiteraard gezocht 
worden naar een naam. Ook het listen van het gehele be- 
stand behoort tat de mogelijkheden. 


Het programma 1s geheel menugestuurd; het maken van fou- 
ten tijdens de invoer is uitgesloten. Dit zuit u wel mer- 
ken tijdens net gebruik van git programma. Het programma 
is zoals dat heet ‘gebruikersvriendelijk’. 


Een Kleine uitleg 15 wel op zijn plaats. Afhankelijk van 
de versie die u bezit kunnen er 58 of 109 namen met tele 
foonnummers worden opgesìagen. Dit laatste is afhankelijk 
van net feit of u geheugenruimte bezit boven #4088. Een 
record (dit 1s gus een naam met telefoonnummer) mag maxi 
maaì 32 tekens tang zijn. Het programma kontroieert dit. 
Als u tijdens het invoeren zich bedenkt en wilt terugke- 
ren naar net hoofdmenu doet u dit door achter het input-7 
niets 19 te vullen en gewoon op enter te drukken. Het 
hoofdmenu werkt met inkey-funkties: D.w.z. Bij net in- 
toetsen van het desbetreffende nummer krijgt u direct re- 
actie van de computer. Het programma wijst verder zich-, 
zelf, Gewoon proberen dus! 


Nu nog iets over net opslaan van de gegevens. Als u het 
programma List zuit u zien dat aìte gegevens ín het pro- 
gramma als DATA zijn opgeslagen. M.b.v. peek en poke wor- 
den de namen en telefeconnummers op de desbetreffende 
plaatsen ingelezen. IK heb dit gedaan om vervolgens met 
de kommando s READ en RESTORE de informatie gemakkelijk 
terug te naien. Verder 1s net programma en bestand een 
geheel zodat na wijzigen of aanvullen het geheel doodsim=- 
pel te SAVEN is; gewoon het programma opnieuw vastleggen. 
Hierdoor is net dus simpel te gebruiken voor zowel COS 
ais DOS gebruikers. 


Wat heeft u nodig om dit programma te kunnen draaien..... 
Nodig 1s hiervoor de clubschakelkaart met daarop het CX- 
systeem. Belangrijk is de aanwezigheid van de P-CHARME en 
ce goede schakeisoft op #1000 nl. deze met de LEFT- en 
MID-straing kommmando's. Dit is versie CX-1.B3. Zoals eer- 
der vermeldt is een RAM-kaart niet noodzakelijk. Zonder 
deze kaart kunt u met net programma "TELESG" maximaal 5@ 
recorus opslaan en met RAM-kaart 108 d.m.v. het programma 
"TELE198". Opgemerkt dient te worden dat in het laatste 
geval git uitgebreidt kan worden tot 458 records. Een na- 
deel is dan wel dat de zoek-routines erg lang gaan duren. 
Misschien dat een stukje machinetaal hier uitkomst biedt. 
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BELANGRIJK: 

Wijzig geen regeis beneden regelnummer 8908. Wanneer U dit 
wei doet, besef dan dat de PEEK en POKE aInstrukties in 
net programma niet meer kloppen. Alles oraait dan volle 
Gig In de SOEP!! Vergeet niet om na wijzigen of aanvullen 
van net bestand, het programma opnieuw te SAVEN!! Dit ge= 
beurt niet vanzelf; het is maar dat U dit weet. 


voor reacties: Piet van ger Zalm, 
Kokkel 15, 
2201VD Noordwijk. 
Telefoon B1719 — 18876 





sorn; Pop—your compuler's too primitive for my homework 
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De IBM-kompakt printer 


Een tijdje geleden stond in de krant een advertentie van de 
Kwantum Hellen waarin weer voor stuntprijzen komputer= artikelen 
werden aangeboden. Onder andere werd een IBM- printer aangeboden 
voor de zeer lage prijs van F 249,--. Het ging hier om de IBM PC 
kompakt printer welke behoort bij de IBM junior-komputer, Gezien 
de interessante prijs, en het feit dat ik nog geen printer bezat, 
ben ik gaan kijken bij de Kwantum. Bij het zien van de printer 
besloot ik vrijwel onmiddelijk er een aan te schaffen. Voor zo'n 
lage prijs kan het toch niet gauw tegenvallen. 


De printer kan A4 formaat aan en print 88 tekens per regel. Een 
nadeel van deze printer was wel het gebruik van thermisch papier. 
Voor degenen die niet weten wat dit is, het volgende: Thermisch 
papier Îs aan een zijde voorzien van een speciale laag. Je zou 
het kunnen zien als kleine capsules met kleurstof. De kop van de 
printer ‘verhit’ tijdens het printen bepaalde plaatsen, hierdoor 
onstaat in de papiercoating een reactie die zich als zwart of 
blauw aftekent. Op deze manier komt de tekst op het papier. 
Nadeel is dat thermisch papier verbleekt in de zon en be- waard 
bij te hoge temperatuur volledig zwart of blauw zal kleuren. 
Voordeel is: geen gebruik van een printerlint en vrijwel geen 
lawaai tijdens printen. 


De printer was speciaal aangepast voor de Commodore 64. De 
konnektor die zich aan de printerkabel bevindt is voor ons dan 
vok onbruikbaar en kan worden afgeknipt. De printer- ingang is er 
een van het type RS-232. Deze zit niet op onze Acorn Atom, maar 
geen nood hiervoor zijn oplossingen. 


In Electuur van oktober 1984 staat een artikel over een interface 
voor RS-232 naar Centronics en omgekeerd. Ik heb deze schakeling 
wat aangepast, onder andere met een goed- kope oscillator, en na 
wat avondjes experimenteren was het geheel werkend. Kosten van de 
intertace bedragen ongeveer f 70,--. In dit artikel is het schema 
met onderdelenlijst opgenomen. De schakeling is gebouwd op 
monte-print, Dit betekent voor de onervaren _ soldeerder 
waarschijnlijk een probleem, maar een printontwerp maken is een 
te grote klus voor een enkel exemplaar. Als er een voldoende 
betangstel- ling voor is, is het maken van een printontwerp pas 
zinvol. 


De volgende opmerking is nog wel op zijn plaats: Ik heb geen 


RS-232 konnektor aangeschaft. Ik heb aan de printer- kabel een 
dinplug gemaakt en op de interface print een kontra dinplug 
‘print uitvoering). Dit vanwege de hage prijzen die voor 


konnektors betaald moeten worden. De kleuren van de draadjes van 
de printerkabel staan in het schema bij de RS-252 konnektor. Het 
schema vermeldt dus de officiele aanstuiting. 





Om het geheel van spanning te voorzien (S Volt) heb ik in de 
komputer twee pennen van de Centronics konnektar gebruikt. Het 
gaat hier om de pennen 12 en 15. Deze worden normaal niet 
gebruikt, Gezien net lage stroom verbruik (35 mA), vand ik het 





sverbodig om de interface te voorzien van een eigen voeding. De 
en in de komputer moeten dus aan de 5 Volt gelegd worden. 





ner 
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De mogelijkheden van de printer zijn goed te noemen. Vele 
funkties zijn software-matig in te stellen. Onder andere: 

compressed mode (156 tekens per regel); 

double width (grote letters); 

een kombinatie van deze twee levert nog een derde 

lettertype (naast het gewone lettertype); 

onderlijning in alle tekstmodes; 

instellen van de linefeed grootte; 

zetten van horizontaie en vertikale tabstops. 
Tevens beschikt de printer over een bit image mode. Dit geeft de 
mogelijkheid om grafische plaatjes op papier te maken; bv. van 
het scherm. Ik heb dit niet kunnen uitpro- beren daar ik op het 
moment van schrijven geen programma bezat om zo’n grafische dump 
te maken. 


Ket gebruik van de printer is een kwestie van het bijbeho- rende 
boekje lezen en het hierbij toegevoegde programma runnen en 
bekijken. 

Het programma geeft voorbeelden van de mogelijkheden op papier. 
In de programma listing bevindt zich intormatie over de diverse 
printer instellingen. Het programma heet TESTPR. Het is allemaal 
niet zo moeilijk. Bij alle voorbeelden in het boekje moeten alle 
CHRS (XX) vervangen worden door #$XX. Onze Atom kent nu eenmaat 
niet het commando CHR$. 


Een ding is nog wel belangrijk. Bij het testen viel mij op dat de 
printer niet automatisch een linefeed gaf (dit is beginnen op een 
nieuwe regel na het printen van iets), Alles wat er tijdens mijn 
test geprint werd kwam op een enkele regel. Dit is erg goedkoop 
in papier gebruik, maar wel slecht leesbaar. Het raadplegen van 
het boekje leerde mij dat een auto linefeed moest worden 
ingesteld met $27$55$1. Na dit gedaan te hebben werkte alles 
perfekt. Ik heb deze routine opgenomen in het datablok van het 
CX-systeem waar ik mee werk. Bij het opstarten van de komputer 
wordt de printer dus automatisch geset. Rest mij nog te vermelden 
dat het papier voor deze printer te verkrijgen is bij Funtronics 
en bij de Bruna boekwinkel. Prijs ongeveer F 15,-- per 108 vel 
A4. 


Voor reakties en aan- of opmerkingen: 


Piet van der Zalm 
Kokkel 15 

2201 VD Noordwijk 
Tel. 01719-18076 
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18 PROGRAM PRINTER-TEST 
28 COF;CLS 

5@ CURSOR 10,7 

48 P.“PRINTER-TEST" 





50 P.S2ij \STOP SCHERM UITVOER 
6D P.$2; \OPEN PRINTER-POORT 
70 P;$27,853, 81; \SET AUTO LINE FEED 
88 FOR N=1 TO 88P."="INEXT N 

90 Pen 7 


108 FOR N=i TO 4 

118 P."PRINTER-TEST  ” 

120 NEXT N 

132 P."PRINTER-TEST #” 

148 P.s13 

158 FOR N=l TO 80;P."=";NEXT N 
P.',815 






U PRINT IK HET NORMALE LETTERTYPE", S15 
190 P.“HOOFD LETTERS id 


209 P.” kleine letters", ,$15 

218 P.$15; \KLEINE LETTER MODE 

226 P."wat gacht u van deze heie kleine tetters?" 

23% P.S18,s15; \STOP KLEINE LETTERS EN 
END-t INE 

24U\GROTE LETTER MODE IN REGEL 260. WORDT GERESET DOOR 
18 


250\ OF DOOR END-LINE; DUS BI BEGINNEN OP NIEUWE REGEL 
268 P.s14,"Ook zijn er grote letters",$15 
278 P.'Of nag u het liever onderstreept? 


289 P.527,$45,S1: \SET ONDERSTREEP MODE 
290 P."Normaat",$15,” Klein ",#18,814, "Groot" 
300 P.527,545,50,413; \STOP ONDERSTREEP MODE 
31 P. "Normale regelafstand”,S13, "Normale 
regelafstand” „15 
320 P.527,548; \SET KLEINE LINE FEED 
350 P."Kieine regelafstand",$13,”"Kleine 


regelafstand"”$15,$15 
348 P.”Kan ook in combinatie met de kleine letters"$15 


350 P."kan ook in combinatie met de kleine 
letters"$i8,515 « 
560 P.527,550,515; \STOP KLEINE LINE FEED 
570 P.s15,” ” 


388 P."TAB-STOPS VOOR TABELLEN",$13,815 
390 P.$27,468,425,455,556,557,503 \SET TAB-STOPS 
488 P.$9,'D.25",59,5P," 14" „515; \SPRINGEN NAAR TAB MET 


418 P,S9,"9.56",EP," 734" ,E1S 

420 P‚s9,"4,44" 59,59," 5.14" E15, SIS 

430 P.$i4” EINDE PRINTER-TEST",$135 

448 FOR N=1 TO BO;P."="iNEXT N 

450 P.s13,513,515 

468 P‚#3; \SLUIT PRINTER-POORT 
478 P,S6; \GPEN SCHERM UITVOER 
480 ELS; CON 

490 END 

50D REM GESCHREVEN DOOR PIET VAN DER ZALM, 81719-18076 
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Bestemd voor ATOM-vrienden met een achtertuintje. 


AARDE en AARDE 


De kans op storingen in komputersystemen neemt van dag tet dag 
steeds meer toe. 

75% v.d. storingen wordt veroorzaakt door beinvloeding van buiten 
af. 

Deze beinvloedingen zijn of kunnen zijn H.F.-bronnen, bliksem, 
E.M.I. (Elektro Magnetisch Interterentie). 

E.M.I. veroorzakers kunnen zijn 

= zenders, 

- motoren met ontstekingssystemen, 

— thyristor regelaars, 

- Án- en uitschakel ontladingen, 

= lasapparaten, 

= allerlei huishoudelijke apparatuur, enz. 


Storingen kunnen via de ether of via het spanningsnet tot in een 
komputersysteem doordringen. 

Storingen via de ether komen direct op de voedings 
op de datalijnen en ook op de aardieidingen binnen. 
Via het spanningsnet kunnen spanningsvariaties ontstaan, ‘denk 
aan de machinefabriek op de hoek die 20 keer per dag zijn 409 pk 
elektromotor ín en uit laat schakelen.) 

Ook pulsen en pieken van b.v. bìikseminslag komen zonder meer via 
het spanningsnet binnen. 

De kans op storingen neemt meer en meer toe, meer zenders meer 
elektrische apparatuur en ook meer digitale appara- tuur ‘die 
vervuilen ook het spanningsnet met vreemde pul- sen). 





teidingen of 


Het is dan ook logisch dat komputersystemen beter moeten worden 
beveiligd tegen dit soort storingen en dat gebeurt ook. 

Er zijn at nieuwe typen komputervoedingskabels vp de markt 
gekomen die bijdragen om dit soort problemen op te lossen. 

Maar eerst even kijken wat we moeten doen om het probleem op te 
lossen. 


De oplossing ligt ín het Schone Aarge Principe. 

Normaal worden komputers en terminals etc, aan de bedrijfs aarde 
geaard, maar deze aarde is niet schoon genoeg (er zijn cok andere 
storings bronnen op deze aarde aangesie- ten). 

Dus wat doen we? ja u raad het al, wij leggen gewoan een aparte 
aardleiding aan. 

De zogenaamde “Schone Aarde”. 

Wel moeten ‘wij zorgen dat de "Schere Aarde” schoen blijft. 


Laten wij onderaan beginnen, in de aarde dus. 

Wij slaan een aardelektrode van B8 tot 129 meter in Ge grand, Ja 
zeker 88 tot 120 meter, 

Maar dan liefst uit de buurt wan andere aardelettraden, want die 
kunnen storing induceren op voze schone aarde. 


be eerste 4 meter onder het aardoppervlatte dient men hoe 
talietbuis over de aardeletktrode te schuiven, “mdat in de eerste 


AARDE _RON KAUTZ ATOM NIEUWS PAG.33 





4 meter ook storingsvelden en wervelingen voor- komen. 

Wij gaan voorts met een 16 of een 25mm2 dubbel atgescherm- de 
kabel naar de verdeelkast. 

In de verdeelkast wordt deze op een aardblok gemonteerd en de 
afscherming wordt apart aan de bedrijfsaarde geman- teerd. 


Deze kabel en ook de komputervoedingskabels hebben door een 
dubbel ten opzichte van elkaar geisoleerd scherm een 
stor ingsonderdruking van circa 1 miljoen maal over een 
frequentiegebied van 18 Hz. tot 30 Mhz (12BdB). 

De totale afscherming is circa 10.098 maal sterker dan die van 
een normaal geärmeerde kabel, 

Het dubbele scherm van de voedingskabel wordt aangesloten aan de 
bedrijfsaarde. 


Deze kabel heeft 5 binnenaders, b.v. fase-nul-aarde ‘schone 
aarde). 
De 5.A.L. (Schone Aarde Leiding) wordt op het aardeblok in de 


verdeelkast aangesloten. 
De andere kant van de S.A.L. wordt aan de aarde van de komputer 
c.q. terminal etc. aangesloten. 


Nu is de 5.4. goet aangesloten, maar er kunnen nog steeds 
storingen binnenkomen via het spanningsnet. Die kunnen worden 
epgetost door een netfilter toe te passen, (bij kleine systemen 


kunnen netfilters bij het wed gemonteerd worden), 


Er wordt verder spanningsstabilatie toegepast d.m.v. een trafo, 
‘variatie prim. max. 15% / Sec. max. 1%), of dim.v. een speciale 
netvoeding, dit werkt als volgt 

De netspanning wordt gelijkgericht, daarmee wordt een akku 
geladen. De gelijkspanning van de akku voedt een statische 


amvormen die weer 22övolt/50Hz maakt, maar dan met een 100% 
zuivere Sinus. 


Deze speciale netvoeding heeft ook nog een groot voordeel, hij is 
bij uitstek geschikt als ‘nobreak’ voeding (tot de akku leeg is). 


t nobreak = als de netspanning weg valt dan neemt de akku het 
over zonder dat de spanning op de uitgang varieert). 
Dit geeft de Komputergebruiker getegenheid am b.v. databe- 


standen weg te schrijven indien de netspanning uitvalt 


Ik hoop dat het bovenstaande voor perfektionisten aanlei- ding is 
om aan de slag te gaan. 


Ron Kautz 





Te keep; Orginel mmedisk-packsnieun met garantie;fl. 450, - 
Printen voor 64 Kk Dram incl.beschrijving;F1.35,- 
Puland. BA49A4-SAFAZ ot TAASZ-ACAT 
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EMCD DATABASE 


INLEIDING 


Een hoeveelheid gegevens kunnen in het algemeen in een bestand 
ondergebracht worden. Dit noemen we een DATABASE. Een DATABASE is op 
te vatten als een in rijen en kolommen ingedeeld great vel papier. De 
rijen worden ook records genoemd, de kolommen items. De records worden 
genummerd vanaf 1. Dit gaat automatisch in item @ met de symbolische 
naam RNR(Recordnummer). De symbolische namen van de andere items 
moeten door U opgegeven worden. Een tekening maakt dit misschien wat 
duidelijker. 


v 

ITEMO ITEM LTEN2 ITEMS  ITEM4 - - ITEM 2 

ENR NAAM PLAATS _ NETNR ABONNEENE -— — JAAR 
RECORD t Janssen Geieen 04494 12345 - 1955 
RECORD 2 Pietersen Ansterdan 020 987654 - - 1955 
H- - - - - - : =H 
RECORD v Klaassen Den Haag 070 135798 - = 1987 

v 


De gegevens worden upgeslagen in de ASCII-file en in de FECORD-file, 
Janssen, Amsterdam, enz. heten STRINGS. Deze strings worden opgeslagen 
in de ASCIl-file. Het RECORD-file bevat de verwijzingen érg. ADRESSEN) 
naar de strings, Op dezs manier hoeft iedere string maar een keer te 
warden opgeslagen, ook al kent ze in meerdere recards voor. Het 
programma springt dus zeer zuinig om met het beschikbare geheugen. 





MENU-BESCHRI JV ING 


Als het programma ENCD database start dan krijgt U het hectdmenu te 
zien. Dit menu geeft de volgende keuze-mogelijthe 





zEERSTE OPSTARI 
=QVERZICHT 
=UPDATEN 

=LOEKEN 

=SORTEREN 
=PRINTEN 
=OPTELLEN 

=MERGEN 

=L0AD DATA BESTAND 
=BAVE DATA BESTAND 
X=DISKZIJDE x INSCHAKELEN EN LATEN ZIEN (. = 


SOON UESUN= 





En 
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Uit het bovenstaande menu kunt U een keuze maken. Natuurlijk is het zo 
dat U, als er nag geen datá aanwezig is, slechts de keuze heeft uit 8, 
8 en Dx, Deze keuzemogelijkheden worden hieronder uitvoerig bespraken. 


EERSTE OPSTART 


Deze mogelijkheid heeft U nedig bij het aanmaken van een nieuwe 
database. Het is erg zinvol als U van te voren even opschrijft hoe Uw 
databestand er ongeveer Gaat uitzien, Dan kunt U op de eerste vraag 
AANTAL ITEMS? het ju e antweard geven (X). Met item B inummering) 
hoett U geen rekening te houden. Hierna werdt vaor de items 1 tot en 
met X de symbolische naam gevraagd. BIJVOORBEELD: 

1. NAAM 

2. PLAATS 

2. ENZ. 

Hu moeten we gaan apgeven wat voor een soort inhoud in een iten kant. 
Ke onderscheiden 2 hoofdmagelijkheden: 

A. ALFANUMERIEK 

Als in een item cijfers en letters bewaard moeten worden (tekst)dan 
moeten we het item ALFANUMERIEK verklaren, 

B. NUMERIEK 

Ais in een item getailen moeten worden bewaard dan moeten we het item 
NUMMERIEK verklaren. Om geen zo nuttig mogelijk gebruik van het 
geheugen te kun maken moeten we nu gaan apgeven hoeveel bytes 
gereserveerd moeten warden om het getal ap te ziaan. Dit gebeurt na de 
vraag Î, 2 of 4 bytes of hexadecimale getallen (-1). 
Hier zijn de vier mogelijkheden: 

1. EEN BYTE GETALLEN 

indien het ep te staan getal Ligt tussen O en 255, dan meet Ut 
opgeven. Dit is b.v. ze met dagen en maanden. 

2. TWEE BYTES GETALLEN 

Als het op te staan getal ligt tussen O en 65535 dan meet U hier 2 
apgeven. Bit komt vear bij b.v. jaartallen, 

E, VIER BYTES BETALLEN 

Indien U met grote of negatieve getallen wilt werken dan meet U hier 
4 opgeven. Er wordt dan gewerkt net de normale integergetallen 
igrenzen ongeveer + en — 2 miljard }. 

4, HEXADECIMALE GETALLEN 

Wilt U werken met hexadecimale getallen dan moet U -i opgeven. De 
getaìlen kunnen daarna zender # ingetypt worden. 

De EERSTE OPSTART maakt automatisch 1 leeg record aan. Er wordt nu 
naar de KOPTEKST gevraagd. Dit is de tekst die later baven iedere 
pagina geprint kan worden. Het zelfde geldt vaer de DATUM die U moet 
opgeven. 














OVERZICHT 


Bij het overzicht krijgt U het volgende te zien: 
1.Symbolische itemnamen met itemscart. 

2.0mvang totaal databestand. 

3.Omvang van het recordgedeelte hieruit, 

4,Omvang van het ASCII -gedeelte hieruit. 

5.Het aantal records dat in het bestand aanwezig is. 
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UPDATEN 


Met behulp van UPDATEN is het mogelijk am records toe te voegen, te 
verwijderen of te wijzigen, We onderscheiden twee houfdmodes: 
RECORDMODE en ITEMMODE. 
1. RECORDMODE: 
Als we, vanuit het HOOFDMENU, UPDATEN kiezen, komen we binnen in de 
RECORDMODE. Op de vraag RECNR? zijn de volgende antwoorden 
mogelijk: 
een legaal getal 
teder record in het databestand heeft een nummer. Als U dus hier 
een legaal nummer intypt komt het record met dit nummer aan de 
beurt. 
Het programma gaat dan over in de ITEMMODE en begint bij ITEM 1. 
Ktelp) 
Het programma laat nu zeer in het kart zien welke commando.5 
mogelijk zijn. 
een return 
Terug naar HOOFDMENU 
NEW 
Nu worden aan het bestand nieuwe records toegevoegd. We gaan nu 
aver in de ITEMMODE. Uit deze mede is te komen met * af DELREC. 
RENUM 
leder record heeft een eigen nummer. Ze worden genummerd in 
volgorde zoals ze met NEW zijn aangemaakt. Heeft U tater Uw bestand 
ep een ander kenmerk gesorteerd (bijv. op naam) dan kunt U de 
records hernummeren (renumber). Later ziet U dan bij het uitprinten 
van het RNR(recerdnuamer) dat U een oplopende teller heeft. 
LOEx 
Localiseer item met nummer #, Dit zoekt een string of getal in het 
bestand. Stel dat item 1 de naam bevat dan verschijnt na LOCI te 
hebben ingetypt de volgende vraag: WELKE NAAM ?. U typt in JANSSEN, 
Nu krijgt U de recordnummers te zien van alle JANSSEN's in Uw 
bestand. 
Lx 
List van alle records de inhoud van itemnummer x« op het scherm. 
Ox 
Buick mode voor item met nummer x. In deze mode wordt bij UPDATEN 
alleen dit item behandeld. U loopt dus door Uw bestand volgens de 
lijn VV (zie voorbeeld ), Uit deze mode is te komen daor terug te 
gaan naar het HGOFDMENU. 
DPMERKING:LOCx en Lx zijn af te breken daor ap de shifttoets te 
drukken. 
2. ITEMMODE: 
U doorloopt in de ITEMMODE het actuele record van ITEM 1 t/m ITEM 
Ze 
Dit gebeurt in de numerieke volgordelzie voorbeeld lijn H-H ), 
Vervolgens: komt het valgende record (in het geheugen ) aan de 
beurt. Dit gaat weer van item 1 t/m item Z volgens de lijn H-H 
enz. (zie voorbeeld }. Van het actuele record en het actuele item 
ziet U de inhoud. De computer staat ap Uw INPUT te wachten. Legale 
antwoorden zijn : 
een nieuwe string of waarde 
De vorige inhoud van dit item wordt vervangen door deze nieuwe 
string of waarde. 
een return 
Ga naar de volgende item van dit record. Of als dit het laatste 
item ga dan naar het eerste itemvan het volgende recard. Er wordt 
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niets veranderd aan de inhoud van van het item. 
Ga terug naar recordmede, 


Ga direct naar het eerste item van het volgende record, 

1 

Geef aan dit iten dezelfde waarde als het cvereenkomstige item van 
het vorige record. 

\ 

Wis van dit item de aanwezige inhoud vit, Als dit mok de laatst 
ingetypte string betreft, dan wordt deze cok uit het ASEII-file 
verwijderd, 


- 





et record, 





Ga terug naar het begin 


8. 

Ga snel naar item met nummer v van dìt record, 
DELSEC 

Verwijder net actuele record uit het databestand, 
HIELP) 


Help mede, Laat de verige aande = Pien. 





ZOEKEN 
Nadat U te zien heeft getregen welke items er zijn, volgt de vraag 
ZOEEEN IN ITEM? U geeft hier het item ap. Dan verschijnt de vraag 


ZOEKEN NAAR? Bij pen numeri :ten geeft U het getal, bij een 
alfanumeriek item geeft U de string die U zoekt, In een string mogen 
ietters ontbreken. Janssen wordt bijvoorbeeld cok gevonden als U Jrsn 
intypt. Heeft de coaputer een geldig recerd gevonden dan verschijnt 
dit op het scherm. Paor nu een toets te drukten zoekt de computer 
verder. Dit zoeken is af te breken door shift vast te houden onder het 
zoeken. 





SORTEREN 


Nadat U te zien heeft gekregen welke items er zijn, volgt er op welk 
itemnuaner het bestand gesorteerd staat, De allereerste keer is dit 
natuurlijk op RNR(item @). Dit is namelijk de volgorde waarin de 
recards zijn gemaakt. Als het bestand ep een numeriek item gesorteerd 
is dan volgt als dit van haag naar laag gebeurd is de toevoeging HL. 
Geen toevoeging betekent dus van laag naar hoog gesorteerd. Nu volgt 
de vraag SDRT NR° Dp een return gaat U terug naar het KOOFDMENU en 
gebeurt er verder niets. Geeft U een itemnummer cp dan valgt als het 
een numeriek iten is de vraag HPL J/N, Hiermee kunt U dus opgeven af U 
dalende of stijgende volgarde wilt hebben, 

Alfanumerieke 1tems worden altijd cp ASCIlwaarde gesorteerd, dus van 
A-Z, 
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PRINTEN 





Als U gekozen heeft voor PRINTEN dan volgt nu het PRINTMENU. Op een 

return of © gaat U terug naar het HOOFDMENU. Er zijn de volgende 

mogelijkheden in het PRINTMENU: 

1. PRINT 
Het bestand wordt uitgeprint zoals U dat zelf gespecificeerd heeft 
(zie verderop). Dit uitprinten kan zowel naar het scherm maar ook 
naar een echte printer. Stuurt U het naar een printer dan volgt de 
vraag VANAF PAGNR?. Dit is handig bij grote bestanden als U vanaf 
een bepaalde pagina geprint wilt hebben. Return geeft alle 
pagina's, -l geeft alles naar het scherm en niet naar de printer. 
OPMERKING: Het printen is te onderbreken door even de shifttoets in 
te drukken totdat het record (regel) klaar is met printen. 

- WIJZIGEN KOP 
De volgende zaken die ìn Uw printout bovenaan de hiadzijde kunnen 
verschijnen kun: U nu eventueel wijzigen. 
a.De symbolische itemnamen. 
b.De KOPTEKST 
c.De DATUM 

» PRINTERSETTING 

De volgende zaken kunt U met J(a) of Níee) beinvlceden. Een return 
af een ander karakter verandert niets. 

=-PRINTER-- 

Wel cf niet naar de printer. Nee is naar het scherm. 

--KOP-- 

Wel of niet een kop boven de te printen pagina’s. 

=-PAGNR-— 

Wel of niet het paginanummer boven de te printen pagina's. 
==DATUM-— 

Wel of niet een datum boven de te printen pagina’s. 

=-NIEUWE BLZ NA IEDER RECORD-- 

Wel af niet een nieuw vel na ieder record (bv, voor adresstickers). 
--PAPIERLENGTE IN REGELS-- 

Hier geeft U het aantal regels op die op een vel passen. Dit is 6 
keer de vellengte in inch. 

KOE ITEMS PRINTEN 

Kier kunt U opgeven hoe U de items geprint wilt hebben. 

=-ITEM-- 

Wel of niet het item printen. Zo ja, verder met: 

=-SUBKOP-— 

Wilt U boven iedere kolom de symbolische itemnamen geprint hebben? 
==LINKS PRINTEN-- 

Hier opgeven of in een kolom naar rechts af links opgeschoven moet 

“worden bij printen. 

==NULLEN ONDERDRUKKEN-- 

Dit geldt ‚alleen voor numerieke items. Indien J(a) dan worden de 
nullen bij printen vervangen door spaties. 

=-DP NIEUWE REGEL-- 

Wel of niet dit item op een nieuwe regel plaatsen. 

=-PRINTBREEDTE-- 

Hier opgeven hoe breed U een kolom wilt hebben bij printen. Er gaat 
niets verloren als U de breedte te klein kiest. Het item schuift 
dan de volgende kolom in. 

Op de bovenstaande vragen kunt U antwoorden: 

a.Een return 


Naar het volgende onderdeel. 
ht 


mh 


3 
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Terug naar het PRINTMENU 
c.8x 
Snel naar item x em daar op te geven hoe U dat item geprint wilt 
hebben, Niet gebruiken bij FRINTEREEDTE, 
dta) of Niee). 
5. OMKEER RESET 
Als U de kolammen in dezelfde volgerde wilt hebben als de items in 
het archief staan moet U dit kiezen. Dit is alleen nodig als U de 
omkering bij printen wilt verwijderen. 
6, OMKEREN Bi PRINTEN 
Als U van de narmale voigerde van de kolammen af wilt komt U hier 
terecht, Nadat U gezien heeft in welke valgerde de items normaal 
tiggen, krijgt U de kans am te wijzigen. U kunt aok een item in 
meerdere kolommen tegelijkertijd laten afdrukken. Op return komt 
steeds het volgende item. Na * komt U terug in het PRINTMENU. 
7. SELEKTEREN 
Het is mogelijk, als U niet het hele bestand geprint wilt hebben, 
hier een selektie op te geven. Van een daor U te kiezen item kunt U 
grenzen opgeven. Dit kan zowel een string als een getalsetektie 
zijn.(bv. U wilt allen de namen Janssen tot Pietersen eruit 
hebben.) Heeft U het te kiezen item voor setektie negatief 
opgegeven (dus bv.-3) dan volgt een NIET functie over de selektie. 
Met andere woorden bv, alle namen behalve de namen tussen Janssen 
en Pietersen warden geprint. 
8. BEEN SELEKTIE 
Als U alle records weer mee wilt laten doen bij het printen typt U 
B. 
OPMERKING: Al de gegevens die U in het printmenu opgeeft werden 
opgeslagen in het databestand. Hiedaor gaan ze bij saven mee naar de 
diskette, zodat ze bij een valgende gelegenheid weer ter beschikking 
staan. 





OPTELLEN 


Nadat U te zien heeft gekregen welke itens er zijn, valgt de vraag 
WELK ITENNUMMER OPTELLEN? Na het betreffende item te hebben ingetypt 
zal de computer deze voor U optellen. Indien U een ASCII item laat 
optellen negeert de computer de itemgedeelten zodra er een niet-cijter 
in veorkont. (bv, 65 =62, bistuke =63, 5465 =5, keerb3 =0) 


MERGEN 


Met MERGEN krijgt U te maken als U met zeer grate bestanden gaat 
werken. Er zijn mogelijkheden om een bestand in gedeeltes te splitsen, 
of vek omgekeerd bestanden met elkaar te kombineren. 

Een bestand bestaat uit een RECORD-file en een ASCII-tile. Als U gaat 
mergen is het nuttig om eerst het ASCIl-file te saven. Daarna kunt U 
het RECORD-file of een gedeelte ervan saven, 

Nadat het aantal records is getoond en gevraagd naar SAVE af LOAD 
wordt naar REC ef ASCII-file gevraagd. Als U kiest voor REC-file wordt 
vervolgd met VANAF RECNR? U geeft nu op vanaf welk recordnummer U naar 
de diskette wilt hebben. Dit gedeelte wordt daarna uit het bestand 
verwijderd en U kunt nu weer nieuwe records intypen. Het ASCII-file 
wordt nu weer mogelijk groter maar blijft toepasbaar voor de oudere 
records 
Het is ùo 








magelijk am een recordfile dat U eerder op diskette gemergd 
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hebt bij een actueel recordfile bij te laden, Als U bedenkt dat het 
ASCII-file achter het recordfile ligt zal het duidelijk zijn dat dit 


van worden overgeschreven. Het programma vraagt dan naar de ASCII-file 
en U laadt het eerder gesaved ASCll-file, Dit wordt nu automatisch op 
de goede plaats gelegd. U kunt nu verder met het door U samengestelde 
bestand. 


LOAD DATA BESTAND 


Op de vraag NAAM ? dient U de naan ap te geven waaronder U de vorige 
keer het bestand op diskette heeft gezet. Na het laden wordt de DATUM 
gevraagd. Vul deze in zodat U na wijzigen en vervolgens op diskette 
zetten de administratie goed bijhoudt. 


SAVE DATA BESTAND 


Aan een databestand kunt U een naam toekennen. Met deze naam wordt Uw 
bestand vervolgens op diskette gezet. Het begin en eindadres van het 
geheugengebied dat ap diskette wordt gezet kunt U vinden als U het 
overzicht opvraagt. 


Dof Du (sel of 2) 


Door D in te typen krijgt U te zien wat cp de schijfzijde staat die op 
dat moment is ingeschakeld. De schijf heeft 2 zijden: @ en 2, Na het 
starten van het programma is dat altijd DRIVE B. Indien U de andere 
zijde wilt inschakelen typt U achter de D een 2 in. Terugschakelen 
gebeurt door achter de D een 9 in te typen. 


Auteurs: 


A.G. Marchal} 
K‚Y.W.Ruland 


Te Koop;Orginele Atom-disk-pack,nieuw met garantie;F1.458,- 
Printen voor 64 K Dram incl.beschrijving;fi. 55, 
K.Ruiand. 84494-54243 of 84493-48002 
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SYSTEMWARE: Gemoditiceerd C- en F-blok 


De meesten van U zullen waarschijnlijk net als ik in de loop der 
jaren hun Atom uitgebreid hebben met een aantal zaken, zoals daar 
zijn Floating Point Rom, Ram van #0200 tot #A238, disk inter- 
face, 80-kolommen kaart e.d. Een nadere bestude- ring van het E- 
en F-blak tb.v. middels Atom-ware 1 en III) leert ons dan dat in 
deze beide blokken een aantal zaken overbodig c.q. lastig zijn. 
Om er twee te noemen: de test op de aanwezigheid van de FP-rom en 
de Reset- routine. 

Om met deze laatste te beginnen: Wanneer we in het bezit zijn van 
Ram vanaf #2908 en verder is de in het F-blok aanwezige test 
hierop overbodig geworden (BFF7C — #FF9A). Met andere woorden: 27 
bytes voor andere zaken beschikbaar. 

Verder is het in een aantal gevaïlen lastig dat na het indrukken 
van de Break-toets elke keer alle Array-adressen (#Z2EB, #520) 
gereset worden cop #FF en dat tevens alle vectoren (#200 -#21C) 
gereset worden op … hun default waarden. Dit laatste betekent dat 
telkens na Break een eventueel aanwezige DOS, VDUBOS routines etc. 
weer opnieuw aangelinkt moeten worden. Aangezien mijn systeem met 
al deze zaken uitgerust is en ik het zolangzamerhand beu ben 
steeds na Break alles weer goed in te moeten stelten middels een 
INI commando, dat een onderdeel van branquart is, heb ik de 
Reset-routine maar eens flink onder handen genomen. 

Alen opzichte van de originele Reset-routine zijn de volgende 
zaken gewijzigd: 


— na het loslaten van de Break-toets wordt gekeken of ook de 
CIR etoets ingedrukt is. 


Drukken we alleen de Break-toets in dan wordt de 8255 opnieuw 
geinitibliseerd, er wordt gekeken of er op #402 en verder 
WDUBB routines staan (versie met jumptabel aan het begin -=> 
21e Acorntjesbrood 4,2.26 e.v.), op het huidige scherm wordt 
de string $6$12"ACOEN ATOM”410S15 afgedrukt en als laatste 
SDO5 1.5 aangelinkt. 

De reset ruutine eindigt met een JMP #CZR2: zet de text-space 
painter op #29 en voer een NEW uit. 

Um deze ‘lorte' Reset-routine correct te laten verlopen is 
het noodvakelijk om te beginnen met een wachtlus (zie regel 
258 t/m 370 un de hierna volgende listing van de RESET-MODI- 
FIEP). Dit om de 8255 even tijd te gunnen zich te stabilise- 
ven na een reset. (rie ook AcornNieuws 2,1.43 e.v.: Bootstrap 
vaar de Acurm Atam), 


Wordt benalve de Break- ook de CTRL-toets ingedrukt dan wordt 
raast het bavenetaande neg het volgende gedaan: 
- Het resetten van de vectoren op hun default waarden 
‘behalve di ar DCS en eventueel VDUBG coft 
Het ruset de Array adressen op HEF 
, LOU -twets uit / curzor uit f P8FE = 0 









CCZ ap Me 


ere  boteeott  vertoant een aldus gewijzigde Atom 
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duidelijk overeenkomst met de BBC en Electron. (It's all in the 
family). 

De aldus ontstane nieuwe Reset-routine past precies op de plaats 
van de originele. Het lag ook in mijn bedoeling om ook nog 
SHIFT-BREAK in te bouwen, die dan #!BOOT zou moeten uitvoeren, 
maar hier is dus extra ruimte in het F- of C-blok voor nodig. Die 
heb ik nog niet zodanig kunnen vinden zonder dat er rare c.q. 
ongedefinieerde dingen gebeuren. 


Als we dan toch bezig zijn kunnen we in het C-blok gelijk de test 
op de aanwezigheid van de Floating-Point er uit stopen (wie heeft 


er nu nog steeds geen Dxxx). Dit kan door op de plaatsen #C5S0 
t/m #C554 en #CAZ4 t/m #CA28 NOP-instructies te plaatsen 

Hiervan _ hoeft U geen spectaculaire snelheidswinst in 
floating-point berekeningen te verwachten (aanroep en uitvoering 


van de testroutine is slechts 31 cycles: bij klokfrequentie van 1 
MHz dus St us.), maar toch 
Wilt U echt snetheidswinst behalen in het Dxxx blok dan kunt U 
beter de Autosync schakeling (op 1.8 MH2) van Peter Ehrlich uit 
Atom Nieuws 5.1.20 e.v. inbouwen (tevens ruisvrij plotten op 1.8 
MHz) . 

Het bestuderen van een disas-lijst van het D-biok heeft mij 
namelijk geleerd dat het D-blok zo mogelijk een nog gratere berg 
spaghetti is dan het C-blok- 





Het moge een ieder duidelijk zijn det voor het implementeren van 
deze nieuwe Reset-routine de originele ROM (Ex xx + Exxx) 
ver vangen moet worden door een EPROM van het type 2764. 





INTIKKEN EN RUNNEN MAA Grapje Konald Boers, 





DO P. #12; B=BEO03 
2-7 
FOR I=1 TO 511 
PE (HDE+R2OR(RNDEL) 
NEXT 1 
FOR I=1 TO 10 
zE=6 
FOR J=1 TO 54WAIT;NEXT 
2B=7. , 
FOR J=t TO 5;WAITsNEXT 
NEXT 1: 
2E=6 
FOR I=t TO 2 
UNTIL © 





WAIT: NEXT 


OFK: Dit grapie werkt alleen als U Uw ATOM niet heeft rzien 
van een ombouw t.b.v, het grafisch printen m.b.v. FCE van de 


8255 
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SOFTWARE: FRACTALS Rob Stekelenburg 









Een leuke toepassing van gecompliceerde wiskunde, biedt het 
volgende pro- gramma. Ik zal niet ingaan op de theoretische 
achtergrond en volsta met te zeggen dat de werking onder andere 
gebaseerd is op het principe van iteratie. 

Hoe werkt het en wat kunnen we ermee? Als het programma gerund 
wordt, ontstaat het zogenaamde "APPELMANNETJE", zie fi- guur 1. 
Het bevindt zich op een X-Y vlak. De zwarte en witte gedeeltes 
geven als het ware de hoogteverschillen in het plaatje aan. 

Het aardige is nu, dat we in dit ‘berg'landschap op 
ontdekkingsreis kunnen gaan! We kunnen elk deel van het plaatje 
tot het 1990-voudige of meer opblazen en in detail bekijken. 
Daarbij komen de meest bizarre en interessante vormen te 
voorschijn! Een uitvergroot deel is weergegeven in figuur 2. Om 
dit te verkrijgen moeten we in het programma de « en y grenzen 
aanpassen. Dit gebeurd in de regels 188 en 110, waarbij 4X en XU 
respectievelijk de onder- en _bovengenzen in de x-richting 
voorstellen en 4Y en ZV idem voor de y=vichting.In dit geval 
waren de waarde 
AXEtB. 15 $ KU= +0. 20 

râ -1.06 $ %v= -1.015 

Een belangrijk punt is het volgende: Hoe groter het detail des te 
meer rekenstappen er nodig zijn om een fatsoenlijk plaatje vanhet 
uitgekozen gebied te produceren. Het maximale aantal stappen 
wordt bepaald door de variable E in regel 30. Voor figuur 1 is 
een waarde van 50 al voldoende, voor figuur 2 is E=180 een betere 
keus. Echter, bij een groter aantal rekenstappen word ook de 
rekentijd langer en dus de tijd die nodig is em het plaatje op te 
bouwen. Voor figuur 1 is de ATOM al enkele uren (tt) bezig. Dat 
wordt in de meeste gevallen dus nachtwerk (voor de computer wel 
te verstaan). Diegenen die bijvoorbeeld PASCAL kunnen draaien, 
kunnen deze tijd aanzienlijk verkorten. 

Voer gebruik met de kleurenkaart moeten de volgende veranderingen 
worden aangebracht. 

Pegel! 20 wordt: 

2öx=127 

Pegel 270 word 
2?0CALOUR tk 45) PLOTIS,N,M 

















Iet slet nog twee voorbeelden om zelf uit te proberen: 
voorbeeld! (voor de ‘kop van het appelmannetje): 
ANTA1. 764 4 LU=+l. 781 

vr@ 5 nVet0. 015 





„00 


Veror bee ld2 
neer, 7445 
+8 
zoa 

Duurt in BADIC vele dagen! tt! 


LUO. 2459 
zE. 1132 
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HARDWARE: de 88-KOLOMMENKAART 








Deze beschrijving behandelt het schema met de 2764 eprom, die op 
nogat wat punten verschilt van de eerdere versies. 

Om iets van deze tekst te begrijpen lijkt het me noodzakelijk het 
schema ernaast te hebben liggen. Voor het tot in details nagaan 
van de timing zijn de datasheets van de J74LSl61/165, de 7ALSi66 
en de 6845 onmisbaar, 


1: Het videogeheugen 


Een 6116 2K*8 statische RAM-chip fungeert als videogeheugen. 
als er een karakter in dit geheugen geschreven of gelezen moet 
worden, moet de processor toegang hebben tot niet-write en de 


data- en adresbus van het videogeheugen. Hiertoe wordt de 
niet-enabte lijn laag gemaakt (een decodeerschakeling voor het 
betreffende geheugengebied moet dus nog aan de schakeling worden 
toegevoegd) . 

Wanneer de microprocessor het videogeheugen aanspreekt worden 
door de muitiplexer (3% 74LS157) de adreslijnen van de pracessor 


doorgeschakeld maar de adresingangen van de geheugenchip en ook 
wordt de buffer (74L5245) geactiveerd. De richting waarin de 
butter doorlaat is afhankelijk van de read/write lijn en 
datatransport verloopt zo overeenkomstig de wensen van de 6502, 
(In mijn proefversie van de 80-kolommenkaart voldeed een Hitachi 
15@ns (HM&lieLP-3) chip niet helemaal: bij teruglezen uit het 
videogeheugen kwamen er regelmatig “foute bytes” voor; met een 
andere 158 nS-chip werkte alles goed... heel geheimzinnig.) 
Steeds als de processor geen toegang eist (dus wanneer 
niet-enable hoog is) laat de muitiplexer de adres}ijnen (MAB …… 
MAIB) van de vìdeocontroller door. Deze adressen leveren 
ASCII-waardes uit het videogeheugen die via de latch (2#74L5174) 
een deel van de adressering van de karakter=eprom bepalen. 

De lees/schrijflijn wordt met de adreslijnen meegeschakeld, zodat 
alleen de microprocessor in het videogeheugen kan schrijven. Zijn 
de adrestijnen van de videocontroller geselecteerd dan is de 
lees/schrijflijn van de 6116 automatisch hoog. 





De videocontroller 


De 6845 zorgt voor het opwekken van de uitleesadressen voor het 
videogeheugen, de rijvadressen voor de eprom en de horizontale en 
verticale synchronisatiesignalen. 

De interfacing met de 6502 gaat als velgt 

De 6845 gedraagt zich als 2 adressen in de geheugenkaart van de 
ATOM. Door eerst in het eerste adres een waarde te zetten (AO — 
Taag) wordt 1 van de achttien registers geselecteerd. Daarna 
wordt bij een schrijfactie de data in het hoge register 
geschreven; bij een leesactie wordt het hoge register gelezen, 
Het lezen en schrijven in de registers wordt gesynchroniseerd 
door PHI-2 (aan de E-ingang). 

ORS (registerselect) bepaalt, ef het hoge, dan wel het lage 
register wordt aangesproken. 

Dt het een lees- of schrijfactie betreft wordt bepaald door R/nb 
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verder moet uiteraard chipselect laag zijn als de 6502 access wit 
plegen. 

Wie meer of alles wil weten over de werking van de 6845 kan 
natuurlijk de datasheet aanvragen bij de drukwerkarchivaris. 


5: De karakter-eprom. 





Hierin staat de geinverteerde karakterset, een komt dus 
overeen met een witte punt op het scherm. 

Als er een karakter tot videosignaal moet worden omgezet staat de 
code voor dit karakter {de ASCII-code zoals aanwezig in het 
videogeheugen) op de adreslijnen A4,.A10 van de epram. Alieen de 
laagste 7 bits van de waarde die in het videogeheugen staat 
worden gebruikt bij de adressering van de eprom. Het hoogste 
bitje dient voor het selecteren van de helderheid van het 
videosignaal. 

De 6845 bepaalt de stand van de laagste vier adreslijnen van de 
eprom (het rij-adres) en selecteert daarmee, welke byte van de 
karaktermatrix gebruikt wordt. In principe zou de controller met 
deze 4 lijnen tot 16 kunnen tellen, maar de software zorgt ervoor 
dat hij maar tot 9 of 10 telt. De karaktermatrix beslaat zodoende 
8 punten in de breedte bij ? of 18 punten in de hoogte. 

De hoogste twee adreslijnen van de eprom — All en A1lZ — worden 
cok door de 6845 aangestuurd, en wel met DE (diptay-enable) en 
Curs (cursor enable). 

Met deze lijnen wordt de eprom in 4 blokken verdeeld: 


DE Curs blok adres in eprom 





5 : #0308 — #O7FF 
1 : : #O8DD — HOFFF 
@ : 2 d #IDOD — HIJFF 
1 : : #1899 — HIFFF 


De blokken @ en 1 zijn geheel leeg (#FF), omdat het niet de 
bedeeling is dat er iets buiten de "hladspiegel", d.w.z. wanneer 
display-enable laag is, gebeurt. Door het hoge bit in deze beide 
blokken “@' te maken zou het mogelijk zijn om een grijze border 
rond het dieplay-venster te maken. 

in het derde blok bevindt zich de data voor de karaktermatrixen. 
Per karakter zijn er 16 bytes gereserveerd (waarvan zoals gezegd 
er slechts 9 of 10 gebruikt worden). 

In het laatste blok staat de informatie voor de cursor. Uit 
eprom-pragrammeer-tijdwinst-vogpunt bekeken is het slim om alleen 
de bytes 6, 9 en 10 laag te maken, de rest hoeft dan niet door de 
programmer bewerkt te worden, vermits uw programmer zijn taak 
“intelligent”  vitvoert. Op deze manier krijg je een 
under lame-cursur. 


VA: Het kiak-circurt. 
De vsciliater (74504) wekt een frequentie op van 14..-16 MHz. 


Dez treyventie wordt toegevoerd aan het _schuifregister 
LEiëb:. dat met deze frequentie bits uitschuift naar de 
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videarambiner, 
Verder wordt dit kloksignaal gebruikt om een teller te sturen 


(74LSIGI) die dit signaal door B deelt. Als de teller stand 15 
bereikt gaat de TC-uitgang hoog. Bij de volgende klokpuls worden 
teller en schuifregister parallel geladen, de teller met een 
preset waarde van B (om voor het B-delen te zorgen), het 
schuifregister met data uit de karakter-eprom. 

Het gedeelde kloksignaal wordt gebruikt als karakter-klok voor de 
videocontroïiler en om de data uit het videogeheugen vast te 
houden door middel van de beide 74LS174's. 


5: De videocombiner 


Op de uitgang van het schuifregister (74LS5166) verschijnen met de 
regelmaat van de klok enen en nullen, bepaald door de inhoud van 
de laatst uitgelezen geheugenplaats van de karakter-eprom. 

Met drie NOR-poorten (open collector) wordt het uiteindelijke 
videosignaal gemaakt en opgeteld bij de synchronisatie-signalen 
die de controller op gezette tijden veroorzaakt. Als het hoogste 
bit van de op dat moment gelezen byte uit het videogeheugen hoog 
is, wordt het niveau van het videosignaal bijna gehalveerd, wat 
resulteert in een gedimde weergave van het betreffende karakter 
op het scherm. Wordt HS of VS hoog, dan wordt het videosignaal 
helemaal naar nul getrokken, 

Ter voorkoming van storing in het videosignaal t.g.v. vieze 
voeding verdient het de voorkeur de 74553 en de spanningsdeler 
via een filtertje te voeden. Zo'n filter kan bestaan uit een 
klein spoeltje (ferriet met ca. 48 windingen dun schellakdr aad) 
in de voedingslijn en een condensator van 47nF naar de aarde, 
Vervolgens verkrijgt men een vlekkeloos videosignaal, 


6. Lijst van ic’s: 


&B45 videocontroller 
6116 Zk*8 statisch RAM 
2764 karakter-eprom 
5x 74L5157 multiptexer 
24 7ALS174 b&-bits data flipflops 
74LS245 databus-butter 
7ALS04 6* inverter 
7ALSI6L (of 163) presettable teller 
74LS166 synchroon schuitfregister 
74LS53 4x open collector NOR 
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HARDWARE: Extra VIA en ACIA op PLS 





Bia gebruik van de in de Atom ingebouwde VIA voor 
commun icatie-doeleinden moet wanneer van de 
nandshakelijnegeoruik gemaakt wordt de 


prainteraansìuiting het ontgelden. Als we gebruik willen blijven 
maken van de printerpoort moet er een tweede VIA gemonteerd 
worden. 

Voor mensen met een rack 1s dit geen probleem, ze solderen 
bijvoorbeeld de dubbele VlA-kaart in elkaar. 

in het geval van mijn Atom ligt dat iets moeilijker: de interne 
Dusconnector 15 bezet door een RAM/8O@-kolomskaart, de connector 
achterop wil ik liever vrij houden voor b.v. een eprom-programmer 
of ander tijdelijk gebruik. De extra VIA moet er dus binnenin. 

Nu ìs de Atom voorzien van een uitbreidingsconnector t.b.v. extra 
communicatie-hargware: PLG. Op deze connector zijn aile signalen 
voorhanden die noo1g zijn voor het aanstuiten van een tweede VIA! 
Deze #&-pens aansluiting zit aan de soldeerzijde van de print en 
is alleen te bererken als je de print geheel losschroeft. 

det is echter niet erg moeilijk om de oude connector er uit te 
solderen om er daarna aan de onderdelenkant van de print een 
haakse uitvoering voor an de plaats te stoppen, Dat uitsolderen 
1s eenvoudig: naal de print neìemaal uit de kast zodat hij aan 
beide zijden bereikbaar 1S en leg hem met de onderdelenzijde naar 
Doven. Dan met een svideerbout een voor een de pennen van de oude 
connector flink warm stoken en naar beneden orukken. Even een 
duwtje na met bijvoorbeeid de punt van een schaar en het pennetje 
zit heiemaat los. ' 
Nu toch ae zaak open j1gt kan er ook nog een kleine verandering 
aangebracht worden. Up PLB 15 namelijk de NMI-lijn voorhanden die 
we normaiater miet zuilen gebruiken. Door het printspoortje naar 
pen 9 van PLS goor te snijden en in plaats van NMI adreslijn A4 
door te voeren (pv. vanaf een van de nabijgelegen 2114-voeten) 
kan er op PLB m.b.v. zeer eenvoudige decodering behalve de VIA 
OOK nog een ACIA ‘e858: worden aangesloten, zodat communicatie 
NIet alseen parallel maar ook serieel mogelijk is, bijvoorbeeld 
met een modem. 

verver moet + INKS warden aangebracht zodat de processor-IRO-lijn 
door verbonden wordt met PLE, 

voor net berekenen van ce baudrate-kjok ben ik uitgegaan van een 
PFETESSOrkKIOk van 1,884 MH2, Deze kioktrequentie wordt aangemaakt 
op Je HBÜ-kolomskaart ats je daarop een kristal van 14.7456 MHz 
gebruikt. 

Als PHI-2 met de normale IMHz2 bibbert is de delerschakeling zoals 
die In het bijgaande schema staat onbruikbaar. De beste 
benadering van baudratetrequenties wordt dan bereikt door het 
siqnaat op vitgang Wa van IC44-B door 13 te delen: hiervoor is al 
eerder een schakeling gepubliceerd in Acorn Nieuws 4-7. De 
mogelijkneio net geneie 1/U kaartje met een 2@-polige bandkabel 
op PL8 aan te sluiten vervalt gan omdat er een extra draadje naar 
ge kiokdeler moet komen. 

De aoresdecovering van de extra VIA loopt van #B408 tot #B4@F, de 
ACIA wordt aangesproken op #B41@ en #H4it. Vanwege de onvolledige 
decodering manatesteren VIA en ACIA zich tussen #B4G@ en #E7ZFF, 
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waartegen geen bezwaar 15 wanneer er in vit geheugengebieg geen 
andere cnips aangesioten zijn. 

De poortuitgangen PbO..PBS van de 
instelìen van de Daudrates voor ontvangen 


volgens net voigende patroon: 


VIA warden gebruikt voar het 
en zenden van de ACIA, 








seB8 Ho : 





In maan versie van het 1I/U-kaartje worden de overige poortlijnen 

+ handshakelijnen van de ViA naar een ZS-polige D-connector 
geleid. De aansluitingen zijn zo gekozen dat een 
bandkabelverbingding met de CP/M-kaart zonder genutsel is te 
realiseren. Voor net handschudden met deze kaart Zijn PB&\CA1 en 
PB7\CBj doorverbonden. 

Voor voorlopig pneb ik de 2zend- ontvangstlijnen van de 6850 
over dezeltde connector gevoerd; voor gelijktijdig gebruik van 
CP/M en een modem moet niervoor een extra connector KOMen.via em Auf op 
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SOFTWARE: Disc-disc copy — een GROS 1.5 utalaty 





De hierna beschreven utility is bedoeld om complete schijven op 
GDOS 1.5 formaat te copieren. Een opmerking vooraf: 


tt _Douple Density Only #! 


Het programma gebruikt het gebied #$2808 — #BĲOAY als buffer; net 
programma moet dus op #8200 of zo staan. 

Eerst moeten we invoeren \n welke vrivets) zich de source- en 
target disc bevinden; en hoeveel tracks geze Schijven zijn. 
Hierbij geidt de restrictie dat we alleen een 8®-tracks schijf 
kunnen copieren naar een 40-tracks schijf wanneer ge 89 tracks 
schijf voor minder aan de helft beschreven is met programma's. 
Bovendien hebben we hier twee drives vaar nodig. 

Vervolgens worden beide drives op track zero gezet m.b.v. *DIR. 
Het prgramma rekent gan uit ìn noeveel slagen de scmijf 
gecopieed kan worgen. Met aantal te copieren sectoren wordt op 
het scherm geprint; bij gebruik van 1 arive tevens net aatal 
copieersìagen. 

Bìj gebruik van twee drives gaat de rest vanzelf. Hebben we 
slechts 1 drive ter beschikking dan wordt steeos de mededeling 


INSERT SOURCE DISC & PRESS KEY 
dan wel 
INSERT TARGET DISC & PRESS KEY 


op net scherm getoverd, Duidelijk nietwaar?! 

Na het copieren wordt de directory getoond van de target disc. 
Let op: bij het copieren van B8g- naar 4@-tracks klopt het 
aantal vrije sectoren niet; Dit komt omdat de schijf Ì op 1 
gecopieera wordt: sector voor sector dus. 


meenen EEEN 


Nee, hoor 


H kunt Uw copy gr&tis bij een 
van de redactieleden inleveren. 
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De hier beschreven PSU regelaar kan men programmeren om een 
bepaalde uitgangsspanning te geven. De toepassingen zijn legio, 
zoals een electromotortje etc. Maar de allereerste gedachte gaat 
toeh uit naar een eprem-programmer. 


De trend tegenwoordig is, om de EPROM, van welk type dan ook, met 
behulp van een PIA of latches te programmeren. Deze nemen dan de 
functies van adres- en datalijnen van de EPROM over, 


De programmeerspanningen van de diverse typen en fabrikanten 
lopen uiteen en zijn vaak 12.5, 21 en 25 Volt. Indien we toch een 
PIA of latch gebruiken, dan zijn er misschien ook nog wel 5 
lijntjes over om deze programmeerspanning vol automatisch voor de 
gekozen EPROM in te stellen. 

Voordeel: geen schakelaars meer (en dus misschien foutief 
instellen); alles software gestuurd. 


Zie schema. 


Stel : Rs = P1 + PZ + P3 
met PAl = PAZ = PAS = '1' 


dan geldt: Vout = (S% (Rs + AK7) / 4K7) 


Na de bouw, de afregeling: 
Hierbij moet U3 < UZ < Ui 


PAQ = PAI = 'B' PAZ = "17 
PS afregelen op gewenste spanning U3 


PAG = ‘B’ PAI = PA2 = '1' 
P2 afregelen op gewenste spanning UZ 


PAI = PA2 = PAS = "1 
P\ afregelen op gewenste spanning UI 


Robert Bernink 
Oldenzaal 
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Degenen die regelmatig het regicblad ACORNTJESBROOD lezen en 
aanwezig waren op de regioavond van april jl. hebben kunnen zien 
dat er veel nieuwe plaatjes voor de Atom in omloop zijn en nog 
steeds verschijnen. Dit alles is mogelijk geworden door een 
video-digitizer welke ik gebouwd heb naar een schema uit het 
Oktober 1985 nummer van het duitse computertijdschrift MC. Hierin 
staat een complete video-digitizer voor een 68880-systeem met 
aanpassingen voor een Apple IC beschreven. 

Met behulp van de digitizer kun je nu beelden van camera's, 
video-recorders en TV's met video uitgang scannen en op de Atom 
in de hoogste graphic mode laten zien (en verwerken natuurlijk). 
Het nu volgende verhaal is een compilatie van de originele tekst 
uit MC, geschreven door Kurt Moraw en aangevuld met eigen tekst 
t.b.v. door mij aangebrachte veranderingen en software. 

Wat is nu precies de werking van zo’n digitizer? Het is een 
schakeling welke een videosignaal van IVpp nodig heeft. Dit 
videosignaal wordt omgezet in digitale informatie (7 bits) en 


doorgegeven aan de computer (1 of 3 bit{s)). Displayed men deze 
informatie nu in:de volgorde zoals het ook gesampled is, dan 
krijgt men een digitale voorstelling op de Atom van het 


oorspronkelijke videobeeld. 

Enige theoretische zaken: 

Het videobeeld wordt lijn voor lijn na elkaar verstuurd. Het 
opbouwen van een beeld duurt in de regel 28 msec. (58 Hz). Het 
totale beeld heeft 625 lijnen en elke lijn duurt 64 microsec 
(15625 Hz lijnfrequentie). In deze 64 microsec bevindt zich de 
totale video informatie van 1 lijn. Elke 2@msec wordt een hál# 
beeld verstuurd (interlaced video), De resolutie van deze 
digitizer beslaat 256#256 punten. Dit valt neg ruimschoots binnen 
de 312.5 lijnen van een half beeld. Deze digitizer gebruikt dus 
van deze 512.5 lijnen maar 256 lijnen. Bij elke frame-sync puls 
zal de digitizer opgestart worden voor het scannen van een 
compleet beeld. Tussen deze vertikale-synchronisatie pulsen 
zullen er 312 lijnen ontvangen worden. Om de monitor, en dus ook 
de computer duidelijk te maken wanneer een lijn begint, wordt er 
aan het begin van elke lijn een zgn. horizontale syncpuls 
gegeven. Tussen twee van dit soort HS pulsen wordt de informatie 
van een lijn overgedragen. De frequentie van de informatie in een 
beeldsignaal voor een lijn bedraagt ongeveer 4 MHz en het 
ingangsgedeelte van de digitizer is hier volledig op afgestemd. 
De helderheids- en contrast nivo's ‘black-level op BV en 
white-level op @.5V) kunnen in de digitizer neg zelf ingesteld 
worden. De extra informatie, in de vorm van kleursignalen worden 
door de digitizer in het geheel niet gebruikt. 


Het analoge gedeelte: 
Zoals nu bekend, het videosignaal bestaat uit synchronisatie- en 
beeldinformatie. Voordat we met het digitaliseren kunnen beginnen 
moeten we de 5 bestanddelen van een videobeeld van elkaar 
scheiden: 

= vertikale sync 

— horizontale sync 

- beeldinformatie 7 
De twee torschakelingen in het analoge gedeelte scheiden de 
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negatieve syncpulsen van het beeldsignaal. Bij de schakeling voor 
het afscheiden van de vertikale sync, wordt de frequentie met C5 
zodanig verminderd, dat alleen het S@Hz signaal versterkt wordt, 
Na de schmitt-triggers staan de syne-pulsen ter beschikking aan 
de digitizer. 
Omdat de spanningsnivo's van verschillende videosignalen niet 
duidelijk gedefinieerd zijn, is er gebruik gemaakt van een ICG die 
zelf het zwartnivo van een videosignaal kan zoeken: de TBA 970. 
Dit IC vindt men veel in portable TV's en bevat een 
videoversterker met helderheidsregeling. De heiderheid kan met P2 
ingesteld worden. Het verschil tussen zwart en wit (contrast) kan 
met P1 ingesteld worden. 
Het versterkte videosignaal wordt nu aangeboden aan een snelle 
Tbits A/D-converter opgebouwd uit de A LMS19's, De referentie 
spanning van deze A/D-schakeling is vast ingesteld met het 
weerstandsnetwerk. Men kan nu met behulp van de helderheids- en 
contrast regeling het videosignaal in het werkgebied van de A/D 
converter brengen. Dit kan ook bewust foutief ingesteld worden om 
zodoende leuke effecten van het gedigitaliseerde videosignaal op 
de monitor te bereiken. 
Het omklapnivo van de comperatoren is met behulp van een 
weerstandsnetwek ingesteld. Het beeldsignaal is optimaal indien 
het zwartnive net onder de omklapspanning van de onderste 
comperator ligt (ongeveer 1.8V) en het witnivo net over de 
omklapspanning van de bovenste comperator ligt (ongeveer 2.8V). 
Met een aangesloten _ huipmonitor kan men het _ reeds 
gedigitaliseerde beeld bekijken en geeft, geïoof me, prachtige 
ettecten. 
Na de comperatoren komt er een prioriteits-selector  (IC14), die 
op zijn beurt een S-bits helderheidsinformatie van een beeldpunt 
doorgeeft en gebruikt kan worden door de digitizer. Met de 
multiplexer (IC13) kunnen nu verschillende beeldsignaal-bronnen 
gekozen worden die elk direkt achter een comperator geschakeld 
is. Wil men het binairgecodeerde S-bits woord lezen, dan moet men 
het beeld 5 keer digitalizeren en steeds een der 5 bits 
selekteren (grijsnivo 0, 1 en 2). Het gelijktijdig lezen van de 
S-bits woorden is niet mogelijk (wil mem alle 35 bits informatie 
lezen en opslaan, dan zal de totale scan-tijd van een beeld nag 
maar ongeveer 0.8 seconde bedragen). Aan de ingang van het 
digitale gedeelte staan nu als ingangssignalen: 

- digitale beeldinformatie 

— horizontale sync 

- verticale sync 


Het digitale gedeelte 
Nadat in het analoge gedeelte het beeldsignaal in 
helderheidsnivo's gesplitst werd, volgt nu in het digitale 
gedeelte het aftasten van dit signaal langs de tijdas plaats. 
Hier volgt dan ook direct een hardwareaanpassing die ik ingebouwd 
heb. Na elke horizontale puls duurt het enige tijd (ongeveer 9 
microseconden) voordat de eerste lijn informatie aangeboden 
wordt. Doch direct na de herizontale syne-puls zal de digitizer 
al beginnen te scannen en hierdoor alleen maar Zwarte balken 
ontvangen. Ik heb de horizontale puls als ingangssignaaì gebruikt 
voor een  monostabiele (IC 22), die de puls ongeveer 
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microseconde vertraagd (in te stellen met P4) en daarna een 
kunstmatige syncpuls genereerd van ongeveer 4 microseconde. 
Hierdoor zullen de (voor mij althans) storende zwarte balken aan 
de linkerkant van het plaatje verdwenen zijn. 

Bij een videobeeld wordt ge beeldinformatie niet punts-gewijs 
verstuurd, doch de beelgpunten vliorien als het ware in elkaar 
over. Omdat een computer alleen maar een @Q of een 1 begrijpt, 
moet de beeldinformatie met een bepaalde aftastfrequentie 
gesampled warden. 

Het oplossend vermogen van de digitizer bedraagt 256 punten. Een 
lijn Buurt 64 microseconden, Na het aftrekken van de tijd die de 
horizontale sync voor zijn rekening neemt blijft er ongeveer 51 
mieruseconden over voor de beeldinformatie. Daaruit valgt de 
aftastfreguentie van S51/256 microsec = 9.199 microseconden per 
punt { dit komt overeen met een frequentie van 5,82 Mhz). Deze 
fequentie wordt opgewekt door de oscillator, gebouwd rondom de 
74LS629 (IC2). Bij elke neergaande flank van de aftastfrequentie 
moet een beeldpunt in de computer gelezen worden. (elke 199 ns.) 
Omdat ons Atompje niet zo snel is, worden er steeds blokken van 
i& punten per lijn ingelezen. Hiervoor heeft de Atom dan 64 
microseconden. Daana worden er 16 punten (van dezelfde kolom !) 
binnengehaald van de volgende lijn, etc tot en met lijn 256. 
Hierna wordt de volgende kotom binnengehaald totdat alle 16 
kolommen (256/1&) ingelezen zijn. Dit komt overeen met het lezen 
van de punten l tot 16, daarna 17 tot Si , etc. 

Het beeld wordt dus in 16 kolommen binnen gelezen. Voor elk woord 
van 16 punten heeft de computer 64 microseconden, wat goed te 
doen is, De leestijd voor een compleet beeld bedraagt dus: 64 
micros « 256 lijnen #* 16 kolommen = 8.262 seconde. 

Deze manier van beeld inlezen is wat deze digitizer za goedkoop 
maalt. De Atom programmeert de digitizer voor het lezen van een 
bepaalde kolom, daor de kolem waarde aan ICit aan te bieden. Een 
16-bits teller ([IC 9 en 10) telt de beeidpunten en een comperator 
geeft een seintje indien de actuele kolom gelijk is aan de 
verlangde kolom. Dit signaal activeert op zijn beurt een 
schuifregister voor het lezen van de 16 punten {IC 4,5,6,7). 
Hierdoor 1e het ook mogelijk om delen van een video beeld zeer 
gedetaileerd te vertonen. 


Het vertikale synchronisatiesignaal wordt softwarematig 
opgevraagd. Nadat deze actief 1s, begint het lezen van de lijnen. 
Het horizontale syncsignaa} activeert de oscillater en reset de 
puntenteller. De eftastfrequentie dient na de horizontale sync 
puls a}tijd met de gelijke fase beginnen, anders kunnen de punten 





in een koiem ten upzichte van elkaar gaan verschuiven. Een eis is 
dan ook: zeer goede flanken van de herizontale sync en een goede 
ittatar. 

Het sturende e@ttert van de zwarte balken aan de linkerkant van 
et breid ina een hurszontale sync even geen video) is 
hardwarematig vpgeiest. Hetzelfde rwarte-balken effect krijgen we 
onver ant van net beeld na de vertikale sync-puls. Dit 
etfect 1s cpgelact door de software. 








De interface 





Het cemguterntad MC had ge totale anterfacang met de computer 
ë st door maurmale FIL IC's vaar het besturen van de 
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verschillende functies in de digitizer en het uitdecoderen van 
alle besturingslogica. Ik heb dit alles vervangen door 1 IC: de 
8255. Dit IC kost tegenwoordig nog maar een gulden of 7 en kan 
door middel van zijn 3 1I/0 poorten alle interfacing op zich 
nemen. Het uitdecoderen van de 8255 dient U nog wel zelf te doen. 
Let op, de 8255 is een positief actieve resetlijn nodig. Mogelijk 
is het om met een invertertje die U nog ergens hebt liggen, dit 
signaal te inverteren. De 8255 bevat 3 poorten. De functies voor 
de digitizer zijn als volgt: 

—= poort A beeldinformatie (16 bit data) 

— poort B bit 8,1,2,5 kotom mummer 


bit 4,5,6 : grijsnivo (mux select) 

—= poort C bit ® : data available 
bit 1 : vertikale sync ingang 
bit 4,5 : selectie beelddata woord 


Ikzelf heb de 8255 uitgedecodeerd op BFD4. Voor iedere andere 
plaats dient de software aangepast te worden. 

Het resetten van de JK flip-flop, welke het ‘data-available' 
signaal geeft indien de 16 bit informatie op poortA aangeboden 
wordt, gebeurd door een  74ALS159 (IC21) die zodanig op de 
controllijnen ís aangesloten dat deze een actief resetsignaal 
geeft bij het uitlezen van poort B (BFDS). Dit resetten dient 
zeer snel te gebeuren en is daarom ‘hardware’ uitgevoerd. Vergeet 
dus niet de AZ, Al, NRDS en de CS aan deze 74LS139 aan te 
sluiten! 

Let op: alle elco's in het schem dien tantaal-C's te zijn. 
Onderdelen: 







R1 = 190k R2,4,5 = IK R5,6,10,28 = i2K 
IKS RB = 27K R9,12 = 2K7 
IK2 RIS = 758 R14,15,16,17,18,19 = 158 
IKB R21,22,23,24,25,26,27 = 470 
18K R5G = 18Kk 
4u7 CZ,14,15 =in C3,9 = 1u 
= 10@@n C& = 100p C7,8,12,15 = 10u 
8.68u CI1l = 129p 
= 5,6 V 


BC3509 T2,5,4.= BC258 
SK P2,4 19K PS = SEK 





78L85 = 74L5629 IC3S = 74L5152 
7ALSS95 7aLS395 IC& = 74&LS395 
74L5595 74LS57& IC? = 7408195 
7aLS195 74585 ICt2= B255 
7&LSIS1 7âLS148 ICiS= 74t514 
LMS1S LMS19 IC:8= LM319 
LMS19 TBAS7G IC2i= 74LS139 
74LS123 


Wat moet men nu alìemaal afregelen ? 
- Pi 2 contrast 
= P2 : helderheid 
: aftastfrequentie (beeld inkrimpen of uitrekken) 
= PA : verschuiven van het beeld naar rechts {nabootsen 
harz-sync) 
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De software 
mannernenenerenn 
Het programma dat op een van de volgende bladzijden is afgedrukt, 
dient men te zien als een basispakket. Men kan 1-bits plaatjes 
‘geen grijsnivo handling) uit 3-bits binnen halen met een keuze 
uit twee formaten: 

= ‘klein’ plaatje 192#256 geheugen #6908-#9500 

= ‘groot’ plaatje 256%256 geheugen #8200-#A000 
Alle niet gedecodeerde beeldinformatie wordt eerst opgeslagen in 
#6000-#8000.. Na het binnenhalen volgt het converteren naar het 
beeldscherm. Indien men de mogelijkheid heeft om het hele plaatje 
in het geheugengebied  #8090-#A00B graphisch uit te printen, dan 
kan men het formaat 256#256 kiezen. 
In het programma zijn de graphische dump routines uit de RXBOX 
gebruikt en dus #8000-#9808 wordt uitgelezen. 
Met enkele faciliteiten uit GAGS is het mogelijk om kadertjes om 
een plaatje te maken en het beeldscherm enigszins verschuiven. 
Het grijsnivo kan direct tijdens het scannen verandert worden 
door de toetsen 8 tot en met 7 als grijsntvowaarden in te 
drukken. Het scannen stopt bij het indrukken van H (hold). Nu kan 
men kiezen uit de volgende bewerkingen: 


=C- continue doorgaan met scannen 

-B- border maakt een klein lijstje (4 dik) 
-E- extended border lijstje van 8 pixels dik 

=L- left scroll plaatje scrollt naar links 
=R- right scroll plaatje scrollt naar rechts 
=U- up scroll plaatje scrollt naar boven 
-D- down scroll plaatje scrollt naar beneden 
-P- printer dump Plaatje wordt klein geprint 
-B- big printer dump plaatje wordt groot geprint 
=S- save plaatje wordt op schijf gezet 
-Ö- quit programma wordt beeindigd 


De video-scan routine werkt als volgt: 

- initieer grijswaarde 

= wacht op verticale sync 

- Skip 4® lijnen (i.v.m. zwarte horizontale balken) 

= lees 256 lijnen van 1 kolom en sla dit sequentieel op 

= volgende kolom 

De conversie routine is gebaseerd op: 

— indien klein plaatje, om de 3 lijnen t lijn overslaan 
(want 5/4 # 256 = 192) 

- indien groot plaatje, alle lijnen converteren 

- zet sequentieele data om in kolommen 


Het programma maakt P-Charme uitbreidingen aan en wel de volgende 
statements: 
INIT — initialiseer de 8255 
SCAN g‚p — Scan en display plaatje met 
g= grijsnive (8-7) 
p= Plaatgrootte (Ö=groot 256#256, 
l=klein 256#192) 


Deze statements zijn dan ook buiten dit programma te gebruiken om 
bijvoorbeeld later de Jbits infomatie van een beeld op te vragen 
en te verwerken om op de printer in posterformaat met prachtige 
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grijstinten (van @ to 7 = 8 grijsnivo's |!) het plaatje uit te 
printen. Een algorithme voor dit soort uitprinten naar aanleiding 
van beschikbare grijsnivo's heb ik nu ten behoeve van een andere 
digitizer voor een FX88 of MX8O printer en zal terzijnertijd voor 
deze digitizer aangepast moeten worden. 

Voor de beeïdbewerkingen is men wel GAGS en/of een RXBOX (of 
Kloon) en/of GDOS1.S nodig, let dus even op indien je een van de 
toolkits niet hebt. 

Normale werkwijze: 

=Regel contrast en helderheid met behulp van de hulpmonitor af 
-Start het programma 

Regel de tastfreguentie EN de verschuiving naar rechts af 

Dit alles net zo lang doen totdat het plaatje op het beeld 
redelijk (wat grootte betreft) overeen komt met het werkelijke 
beeld 

Dit alles met SCAN (5 tot 7), 1 (normaal j bits. Z/W beeld, klein 
plaatje). 


De totale kosten van de digitizer zijn ongeveer 78 gulden. Dit 
maakt zo'n ding erg aantrekkelijk voor avonden lang te computeren 
en tegelijkertijd TV kijken. De resuitaten zijn erg goed te 
noemen, al moet ik zeggen dat met een camera betere resultaten te 
boeken zijn dan met b.v. een video-recorder, waarvan de 
sync-signalen toch al niet de steilsten ter wereld zijn. Een 
oplossing is b.v. een video-optimiser die de flauwe sync-signalen 
zeer sterke flanken geeft, toe te passen. Op dit moment is er in 
ieder geval geen gebrek meer aan plaatjes, zodat je aìtijd iets 
hebt om naar te kijken. 

Niets op TV vanavond ? 

Gerrit Hillebrand 


P,S. De onderdeien van de hulpmonitor trap zijn misschien niet 
overduidelijk, hier alsnog de trap in close-up: 
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Pe VIA GSR. 
Vemsatile Irntenfaeacrer Ads ptem.- 
PEEL ZZ. INET PA OUTE … 


Na het bouwen van het I/O-moduul dient men deze te testen op zijn 
kwaliteit en mogelijkheden. 
We beginnen bij de LED's, door het sturen van een hexadecimaal (O-#FE) 
of een decimaal (O-255) getal naar de output poort, die dan op bitnivo 
de waarde sangeeft. Als dit prima werkt, gaan we de schakelaars 
uitlezen en zichtbaar maken op de LED's. 
Indien het  1/0-moduut niet werkt, dient men de votgende punten te 
kontroleren: 
X plaatsing komponenten 
doorsol deringen 
x printsporen op haarscheurtjes af breuken. 
Kk aanwezigheid SV voedingsspanning op de print 
* plaatsing van de VIA 6522 + eventueel doorverbinding LINK 2 
X aansluiting op de goede zijde van de konnektor 
{ zie AN.5-4"8A blz 40) 


PROGRAMMA: 


De volgende programma’s zijn hierin opgenomen: 

LED's sturen 

Schakelaars uitlezen en zichtbaar maken op de LED*s 
Het doortaten van 1 schakelaar b.v. FAO 

Knipper / tooplicht 

= Knipper / Looplicht met tijdsintervallen van FA's 
= Verkeerslicht. 





We kunnen dit soort programma's aanpassen en uitbreiden naar ieders 
wens en alle toegankelijke toepassingen. 
Zelf heb ik enkele programma’s gemaakt voor het uitlezen van 


natuurlijke konstanten, vaor "EAS- en KLIMAAT regeling" van een 
tuinbouwkas. 
De ingelezen konstanten zijn: in=- of uitschakelen: 

x temperatuur kachel, verwarming 

* licht tamp / zonnescherm 

* vacht sproei installatie 

k windrichting dakramen sturen 

* windsnelheid tocht / storm alarm. 


Gebruikte literatuur: 
Acorn Manual blez.170 
Acorn Nieuws 5-4°84 blz 39 Freddy Ingels 
6502 assembly Leventhal 
Datasheet SY6522. 
Samenstelling: - 
Andre Wessels Harreveld december 1985. 
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FROGRAMMA' 5 woor het I/0O-—modiuul - 


Alte machinetaalprogramma’s zijn uitgetest. 
Ze staan op schi if onder de namen: 


DL2leds LED's schakelen 
* DL2skls schakelaars uitlezen via de LED's 
* DL2sklr, schakelaar FAO doorlaten 
” DL 2laap kooplicht 
+ DL2lltL looplicht met tijdvertraging via schakelaars 
“ Dt2knip knipperlicht 
“ DL2Elti knipperlicht met tijdvertraging schakelaars 
x DL2vrkl verkeerslicht 


Rij elk MACHINETAAL programna staat een equivalent in ATOM BASIC en in 
F-charme. 
Op deze manier kan men kiezen uit een van de mogeli kheden. 


Door het indrakhen van een toets, 
krijgt men de inverse waarde op de LED's. 





In MACHINETAAL: i0 REM LED'S INSCHAKELEN 
20 REM ANDRE WESSELS 

19 REM LED'S INSCHAKELEN 30 PEBBOZ=HFF 

ZO REM AFHANKELIJK VAN HET GETAL 40 FORI=OTOt0 

30 REM OP REGEL 150 EN 160 50 PRESOO=O 

40 REM PBO T/M PB7 +0 LINK#FFES 

50 REM ANDRE WESSELS 70 PERBOOZAFF 

&0 DIM LL (4) Bu LINESFFES 

70 V=RRBOO;REM basisadres VIA 6322 90 NEXT 1 

80 FOR I=OTOL 140 END 

9 F=#2800 

1OOL 10 FROGRAM LED'S STUREN 
11O:LLO LDADHFF 20 

120 STA V+2 \DDRE output 30 VehB8OO;REM basisadres VIA 
150:LL1 LDADHOO \LED's uit 40 

130 STA Vv 50 PROC INIT 

156 IJSRAFFES \wacht op key BĲ PV4E) =FF 

160 LDAD$FF  \LED's aan 20 PEND 

170 STA V 80 

180 JSRAFFES ‘wacht op key 9) T=10 

190 JMP LLL 106 INIT 

200} 110 WHILE Iz 
210 NEXT I 120 I=l-1 
220 LINK LLO 130 PV=WOOFREM LED's uit 
230 END 140 _PAUSE120 


150 PV=WFFGREM LED'S aan 
160 PFAUSE120 

176 WEND 

180 

190 END 
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De stand van de schakelaars worden zichtbaar 


In MACHINETAAL; 


10 REM SCHAKELAARS UITLEZEN. 


20 REM DOORLATEN 


VAN ALLE 


30 REM SCHAKELAARS PAO T/M PA7. 
30 REM ANDRE WESSELS 


50 DEM LL (4) 


6) V=tBROOIREN basisadres VIA &5 


70 FOR I=0TOi 
80 P=#2800 


BOE 

1000 LDADHFF 
ii STA V+R 
120 LDADROO 
150 STA V+S 
140sLt1 LDA Vel 
150 ST& MV 
160 JME LEL 
1701 


186 NEXT I 
19G LINK LLO 
200 ERD 


\DDRE output 


\DDRA input 
\schaketaars 
\op LED's 


ap de LED's. 


10 REM SCHAKELAARS UITLEZEN 
20 REM ANDRE WESSELS 

30 2e 

40 
50 
60 
70 





10 PROGRAM SCHAKELAARS LEZEN 





V=#BBOO REM basisadres VIA 


50 FROC INIT 


&t 


70 


2 HEF 








80 FEND 
30 

100 I=5 

110 INIT 


it 


Dj WHILE 120 


AEO Pym (VAI) 


14e 


CO WEND 


150 
160 END 


Wil pen slecht 1 schakelaar erait filteren! 


In MACHINETAAL 3 


10 REM SCHAEELAA 
20 REM DOORLATEN 
30 REM SCHAKELAA 
40 REM ANDRE WES 
50 DIM LL 4) 


B VEkHBOO;REM basisadres VIA 6522 


7 FORK I=OTO1 
8û P=#2800 


GOL 

10OstLö LDAD#FF 
110 STA V+2 
120 LDADHOO 
130 STA V+5 
14O:LLt LDA V+l 
150 ANDOHOL 
160 STA V 
170 JMP ELLA 
1803 


190 NEXT 1 
200 LINK LLO 
216 END 


RK UITLEZEN, 
VAN 1 

R FAO 

SELS 


\DDRR output 


\DDRA input 
\schakelaar 
\PAG doorlaten 


10 
20 
zo 
AC 
50 
&o 
7o 
80 
zo 
100 
116 
120 
130 
140 
150 


10 REM SCHAKELAAR FAO LEZEN 
20 REM ANDRE WESSELS 





A0 
50 DO PHHBOO=G 

60 IFP#RBOi=l THEN?#RBOO=L 
70 UNTILO 

80 END 





PROGRAM SCHAKELAAR PAÒ LEZEN 
REM ZIE REGEL 70! 
VekBBOO; REN basisadres VIA 


PROC INIT 
POD REE 
TVEE) FE 

PEND 

I=9 

INIT 

WHILE IO 
PV=R (VHI 

WEND 


END 
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Het het verkeerslicht programma kun je een eenvoudige 
kruising regelen onafhankelijk van het verkeers wanbod. 


In MACHINETAAL: 


10 REM VERKEERSLICHT 
20 REM ANDRE WESSELS 


16 REM VERKEERSLICHT - 30 PHBBOZEHFE 

20 REM WACHTLUS LINK#FF&6=1/608 50 DO ?#BBOO=#8C 
30 REM X=VARIABLE, LINK#FEBS=X/ 608. 50 A=40; GOSUBa 
40 REM PB7 KONTROLE rood2 60 P4BEOO=#BA 
50 REM PB5,4,5 VERKEERSLICHT 2 7 A=50; GOSUBa 
&G REM PB6 KONTROLE rood! BO ?RBBOO=HCH 

70 REM PR2,1,0 VERKEERSLICHT 1 90 Az603 GOSUBa 
BO REM ANDRE WESSELS 100 "#B8OO=#6L 


90 DIM LL (4) 


i10 A=60; GOSUBa 


106 V=#EBOO;REM basisadres VIA 6522 120 PKEBOO-NSI 


110 FOR I=OTOI 
120 P=#2800 


130L 
140sLL0 LDAD#FE « 
150 STA V+2 
160 LDAD#OO 
170 STA V+Z 
180:LL1 LDAD#8C 
196 JSR LLZ 
200 LDAD#8A 
210 LDX9877 
220 JER LLT 
250 LDAD#CH 
240 JSR LLZ 
250 LDAD#61 
260 JSR LL2 
270 LDADHS 1 
280 LDXO#77 
290 JSR LLZ 
300 LDAD#C9 
340 J&R LL2 
220 JMP LLi 
Srl LDX Vel 
5 STA V 
JSRHFRBS 
RTS 





580 NEXT I 
590 LINK LLO 
400 END 


Veel sukses met de 
December 1985 


130 A=30; GOSUBa 
140 P$BBOO=RCP 
150 A=60; GOSUEa 








160 UNTILO 
\DDRE output i70aFOR I=0TOA;WAIT;WAIT 
180 NEXT 13 RETURN 

\DDRA input 190 END 
\vlzeR, vl1=6 
\wacht lus 
\v12=R, vl 1=0 
25. 10 PROGRAM VERKEERSL ICHT 
\wacht lus 20 
\vi2eR, vlek 30 VekHBOO;REM basisadres VIA 
\wachtlus 40 PROC INIT 
\vl2=5, vl ek 50 PVDD RFF 
\wacht lus 60 PEND 
\v12=0, vl 1=R zo 
\28. 80 FROC LEES 
\macht lus 90 _ PV=#EC; PAUSE1O0: REM rg 
\vlZ=R, vl lek 100 HBA; PAUSE SO;REM ro 
\wacht lus 110 PV=8CI; PAUSELOO; REM rr 
\opnieuw 120 _ PV=k6ij FAUSELOO;REM gr 
\schakelaars 150 _ PV=#E13 PAUSE SO;REM or 
\op LED's 140 #CT; PAUSE1O0;REM rr 
ti idhus, X 150 CEND 

160 PFEND 

170 

180 INIT 

190 DO LEES 

20 UNTILO 

210 END 


programma’ s. 
Andre Wessels Harreveld. 
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De 2 oranje en 2 rode LED's knipperen om 
10 
In MACHINETAALs 26 
350 
10 REM KNIPPERLICHT 40 
20 REM WACHTLUS LINK#FFG&=1/605. so 
50 REM ANDRE WESSELS LO 
40 DIM LLC4) 7 
50 v=e#RBÓ EM basisadres VIA 6522 go 
60 FOR T=GTOL za 
70 P=#2BO0 100 
aor 110 
Gort LO LDADHFF 
100 STA W+2 \DDRE output 
11OzLL1 LDAD$LE 
120 JSR LLS ‘wachtlus 
150 LDAIRCO 
140 JSR LL2 \wachtlus 
15 JMP Lit 
1&OztlL2 STA V 
170 JSR#FEA6 “ti jdlus 
180 JSRHFEGG \ti idius 
190 JSR#FES& \ti jdlus 
200 RTS 
2103 
220 NEXT 1 
z LINE LLO 
240 END 
Met behulp van Je suhakeiaars kan men de 





In MACHINETAAL: 






KNIFPERLICHT HET TIJDVERAGING 
WACHTLUS LINKHEFG& 
KEVARTABELE,LINK4FEBS 
ANDRE. WESSELS 

Lt (4) 

:RKEM baesisadres VIA am 


REN 
REM 
REH 
KEN 
DIM 




















ao Pk 25 

SL 
1902LL9 LDAD#EF 
110 BTA V+Z \DDRR output 
120 LDADHC 

130 STA Ut \DDRA input 
14ÓrtL1 LDADHIZ 

in JSR LLZ “wachthus 
160 Loto 

170 JSR LL2 “wachtlus 
180 JMP Lit 

190:LL2 STA VU 
200 LDK Vel \schakelaars 
2tó JSR#FBOE \ki jdlus 
220 RTS 
2501 
240 NEXT LI 
250 LINK LLU - 
2460 END 








bearten. 
REM KNIFPERL ICHT 
REM WACHTLUS LINK#FEG&=1/ 608, 
REM ANDRE WESSELS 
P$BBOZ=HEF 
FOR 1=OTO10G 
P&BBOO=RDS 
LINKHFEGG 
#BBD0=0 
LINKRFESG 
NEXT T_ 19 PROGRAM KNIP FERLICHT 
END za 
50 VetBOOOFREM basisadres VIA 
a0 
5e PROC INIT 
65 PAD ERF 
7o PEND 
Bo 
90 FRGC FLASH 
1060 ever 
110 PAUSE 4 
120 Eyk 
E50 PFAUGE &ù 
130 PEND 
150 
180 INIJ 
170 DO FLASH 
180 UNTIL 
190 END 
Eifdlus vertragen. 


MET 
REN WACHILUJS KeVAR,LINK#FROT 
REN ANDRE WESSELS 


iù REM KNIPFERLICHT 


zo 














NEXT 1 HET ‘r1JbLuS 

126 END Ve#BBOOLREM basisadres 
DX 

140 LINKKFBST ROE INT 

St EETURN Weijer 


BIO 


ERGC FLASH 
vekCF 





vel) 
HOO 
13 PAUSE 
150 FEND 

160 
17a 


VA 


INET 
180 DO FLASH 
190 UNTILG 
EOD END 





DEEL 2 VIA/6522 ANDRE WESSELS 
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Hiermee kan wen 
Door gebruik te paken van OPTOCOUPLERS 


In MACHINETAAL: 


10 REM LOOPLICHT 


REM WACHTLUS LINKRFF66=1/605 ° 





een looplicht simuleren. 


kun je Z20V schakelen. 
10 REM LOOPLICHT 

20 REM WACHTLUS LINK#FEb&=1/608. 
50 REM ANDRE WESSELS 

40 ?#BBOZ=4FF 





20 30 FOR 1=0TD100 
50 REM ANDRE WESSELS 60 ast 10 PROGRAM LOOPLICHT 
40 DIM LL 4) 70 FOR J=0T08 20 
50 V=HEBOO;REM basisadres VIA 6522 ab MUBBOG= JO V-RBBOOSKENM basis 
60 FOR 1=OTD 90 A=A42 Kid 
70 P=#2800 100 LINK#FE6& 50 PROE INIT 
Bor 110 NEXT J 60 P(V+2) =BFF 
90: LLO LDAABFF 120 NEXT 1 70 PEND 
too STA V+2 \DDRE output 130 END Bo 
110 LDA2800 90 PROC SCHUIF 
120 STA V+5 _\DDRA input 100 1=256 
130stLt LDAD#CG 110 
140 JER LLE \wachtlus 120 
150 KOR A naar RECHTS 130 vel 
160 JMF LLZ. 140 PAUSE 10 
170:LLE STA V vop LED's 150 WEND 
180 JSR#FEG6 \tijdlus 160 PEND 
194 RTS 170 
zou 180 INIT 
Zio NEXT 1 190 DO SCHUIF 
220 LINK LLO 200 UNTILa 
Z30 END 210 END 

Met hebulp van de schakelaars kan men de brrdlus vertragen. 

15 REM LOOFLICHT HET 


Im MACHINE TA: 


19 REM LOOFLICHT HET TIJDVERTRAGING 








20 REM WACHILUS LENKHFF6S =  1/605. 
TO KEM X=VARIABELE LINESFERS = A60 
det BEM ANDRE WESSELS 

DIM Lt4) 
bit Ve HSC zedres WIA &Se- 





ze 


an 


FOR 1 
Fe zge 


Li LDASHER 
BTA Wez 
Lbepkoo 
STA Vel 


DDRE output 


LOE a rput 





Did ®rt 








1SCsbte wacht lus 

1e RGL #& mar LIE 

170 IME LIZ 

IB tE LEL « 
that eleart 
br ieddus 





20 REM WACHTLUS X=VAR, LINKRFE 


REN ANDRE WESSELS 





bus. 


30 










80 “HRBO2=HFF 
5, 50 M#EBOZ=DO 
2e FOR IsoTALSG |, LROGRAN LOOPLICHT 
HET TIJDLUS 
=HRBODIREM basis: 








an 
en ze PROC INT 
Ar amBel AVD =HEF 
EPPSRSS A toe =ko0 
Ex el 
NEXT 1 a FEND 
ye END 100 FROC SCHUIF 
110 1=25 
120 WHILE 120 
120 
14 
ISO PAUSE P(ve1) 
16u WEND 
170 PEND 
1aa 
190 INIT 
zo DO SCHUIF 
Le UNTIL 






Zit END 
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De CPL SSC pimaansluitinagsesn- 
De pimaansluitingen van de CFU &507 zijn im figuur 1 gegeven. De 
adreshussen zijn aangesloten op de pinnen 9 tot en met 20 en ZZ tot en 
met 25, de databus op de pinnen Zó tot en met 23, 

Vss (OV) is verbanden met de pinnen 1 en Zl en Voo CHSVE/-5%, absoluut 
maximum is 7,0V) op pin H. 

Voor de kloksignalen zijn pin Z (A1, 57 (00) en 39 (62) gereserveerd 
zie 77 uit- en 7v7 inganassignaten). 

De ingang RDY {ReaDY) op pin 2 wordt toegepast indien EFROM's of 
EAROM" = worden gebruikt. Die gehe hebben een betrekkelijke Ìange 
toegangstijd en kunnen niet worden toegepast bij sistemen die op valle 
snelheid werken. Doer de ROY-pin Laag te inak tijdens de impuls van 
Dt en R/Wei (leesopdracht), wordt de # cyclus van de procesor 
vertraagd, totdat de detta uit het geteugen beschikbaar is op de 
datati jen. 

Het Byme-signaal uit pin 7 waardt gebruikt vi de fe 
processor te signaleren. Dese pin is alleen hoog gedurende de 
operatie ude sbcheyclus (instruktbieevelus Van Heumen), 





























cheyelus van de 





















Pin 38 BU (Bet Overttow) maakt het mogelijk d in het 
(Conditie Code Register) Le beinvlaede 
De pinnen 5. zijn miel sangestuter. 

RET O2 80 9 ne nc AN OBO DEI DRT DRF DR DRT DRG DHT ARLSABIARBLJABLZ Jas 

v i Yv : . * x LE x Ei EJ * * á à 

dte . VOW Neve re 0 
Vas RDY@1 IRQ nc HMI Syn Vec AEO ABL ABZ ADI ARA ABT Afó AB7 ABG ABI AE1OABI 

figuur 1, 

Pim MMI & KAT BE IRG 
Met de ingang IRG (interrupt Reluest) op pin 4 kan een topend 








programma onderbrak warden voor een interrupt, Een interrupt wardt 















veroorzaakt als d pin laag gemaakt wordt terwijl de I-vleg in het 
CER "Ot is. Dit int uptgignaat is "maskeerbaar” en werdt toegestaan 
als I=vtagst. 

Op Bin &x HMI Non Maskable interrupt), kan een interrupt worden 
gegeven. Ook nu moet de pin laag gemaakt worden. Dit interrupt is 





echter niet maskeerbaar “du 
vnafhankelijk van de stand warn de I=-vlaa im teek 


WIET bergen te hauden!) en wordt 
CER ui tawevoerid. 
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Op pin 40 vinden we de RST (ReSeT) ingang. Deze dient onder andere 
voor het resetten van de registers in de CPU. Bij het inschakelen zijn 
de inhouden van deze registers volkomen willekeurig. De processor moet 
nu ster in een wachteyclus, ziijn sisteem-programma doorlopen en 
wachten op gegevens voor het laden van het geheugen met een programma. 
Een wachteyetus is bijvoorbeeld "de toetsenbordscar". Door de pin RST 
laag te maken er daarna weer hoog, wordt na zes klukeycli voor het 
initieren van de processor (reyisters in de beginstand plaatsen, b.v. 
de Btackpointer op #FF) de adresbus op #FFFC gezet. Op dit adres staat 
de laagstwaardige byte van het startadres voor het sisteemprogramma. 
Deze byte wordt in de  pragramna-counter “laag' geladen en de 
adreslijnen gaan op HFFFD. Op dil adres staat de hoogstwaardige byte 
van het startadres dat in de programma-counter “lhoog’ geladen wordt. 
De inhoud var de proaramma=counter kant nu op de adreslijnen en de 
processor gaat het. programma. beginnend op dat adres, afwerken. Zowel 
het startadres in HFFFG en HEFFD als hel sisteemprograume moeten in 
ROM aanwezig zijn. 
De processor wordt dus mel de RST-pin gestart. Het omlaag maken van de 
RST kan al geschieden tijdens hel inkomen van de voedinasspannina. Is 
de voedingsspanning ingeschakeld dan moet na tenminste 2 klokcycli de 
RST-pin koog worden. De processor start dan autamatisch ra het 
aanzetten van het apparaat 
Hier is dus up twee geheugenplaatsen een adres gegeven waar de eerste 
instruktie staat var ern pr Ati. be intoud van deze 
geheugenplaatsen worden een “vektor’ genoemnd. 
De u &502 CPU kent 5 vekkorern: 

De: MMT vekter op HFFFA en HFFFE, 

De RST vektor op HEFFC en HFFFD. 

De IRQ vektor cp HEFFE en HEFFF. 
Bij een NMI-interrupt. wordt de lopende instruktie im de CPU EERST 
voltunid, de pragtamma-counter en het CCR worden op de STACK gezet en 
de inhoud var de geheugenplaatsen SFFFA en #FEFB worden in de 
processor geladen. Dese dala vormen het adres voor het interrupt 
progtamna in de volgorde leag-hoog. Dit interruptprogramna wordt 
doorlopen. Aan het eind hiervan vinden we de instruktbie RTI (ReTurn 
from Interrupt). De oorspronkelijke inhouden van de pragramma-counte 
en het CCR worden weer van de STACK gehaald zodat de processor op het 
adres verder kar gaan waar hij het lopende hoofdprogramma had 
verkaten. 
Door het laag maken van de pin HMI volgt maar 1 keer een interrupt, 
gok al wordt deze pin verder omlaag gehouden. Om opnieuw een interrupt 
te kunnen veroorzaken moet de pin eerst hoog worden gemaakt en dan 
weer laag. 
Dit is niet het geval als een interrupt wordt gegeven met de pin IRG. 
Deze blijft een interrupt geven cotang de pir laag gehouden wordt. 
Daarom wurdt rog voordat naar het IRG-interruptprogramma wordt 
gesprongen, (startadres HFFFE en H#PFFF in de volgorde laag-hoog) de 
interruptvlag TI gezet (Ist). EBEij de instruktie RTI wordt de I-vlag 
weer ) zodat het zaak is VOOR die tijd de IRG-pin hoog te maken. 
Anders vindt opnieuw een interrupt plaats. 
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MEERDERE INTERRUPT -AANVRAGERS. 


Meestal zijn er meerdere interrupt-aanvragers. In dit geval krijgt 
elke anderbreker een bepaalde prioriteit toegekend, Hoe hoger de 
prioriteit des te sneller men werdt behandeld. Een belangrijk verschil 
tussen IRQ en NMI is dat IRG via en door het programma kan worden 
genegeerd ‘denk aan het bordje ‘niet storens”), een NMI wordt aïtijd 
doorgelaten (denk aan ‘brandmeldingt® >. 


NESTEN VAN INTERRUFTS. 


Wanneer het programmatechnisch mogelijk is of gewenst kunnen we ook 
interrupts toelaten in de ISR (Interrupt Service Routine). We moeten 
dan in deze ISR wen CLI (Clear Interrupt) instruktie aanbrengen, Net 
aìs bij subroutines is het dan mogelijk om irterrupts te nesten. We 
moeten dan wel zorgen dat de Stack voldoende diep is daar het gevaar 
van stackoverfluw hierbij groot is. : 





“aa ik =vern SS TOREN" 
Wat gebeurt er mu in de ACORN ATOMT 


De HHI-ve 








Dee inhaud van de HMI-vektaor (FFFA & #EFFR) startadres van de 
MMI-routine op #FFD welker w reen vekbaot adt im RAM heeft op adre 
& HEZOL Claag=hoag). Dit RAfl-vektoradres wordt. tijdens d 
„rautine geladen met de inhoud HEB7E (alleen als ce DOSROM aanwezig 

















ist. 
De Nit-pin is binnen dee SLURN ATOH niet aangesloten doch is wel 
aarmezig op de bus FLA/7 pin 29, De disc maakt wel gebruik van de 


MI -pin. 


De Hrl-routine heeft zijn startadres van de NMi-vekbor en ziet er 
alsvalat uit. 
FFC? FHA zel accu inhoud op stack. 





FFCB JMP GROZ00S spring naar het adres det staat op 
HIZOO LHTE) & HOEOL (HEB) dusHEB7B. 
{alteen bij disc) 
Eerst wordt keken af het interrupteregdest bit in het statusregistern 
van de FDC toppy Disc Controller? gezet is. Bet betekent at er 
iets aan de hand is, uf dat de opdracht voltamid i in beide gevallen 
maet. het resuitaat=register bekeken warden. 



































ES7E LD&#0A00 lees het statusregieter van de FDC, 

EB7E AND DDA test op interrupt request bit. 

E850 BEU#EBSE indien gezet,resuttaat-register bekijken 

EBB INC #F6 verhoog lage byte laad cq. Save atres 

ESB4 BHEHEGEE ats geen overscrijding paqinagrens naa 
Zer o-Fage shire 








EB8& ING #F7 verhaar he ve adres 


EDBH JMFHOOFZ qa naat Zert 


2 byte laad cq. 
ager OLE ien 
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Eerst registers en actu veilig zetten dan resultaat bekijken. 


E8GB TXA X-register naar Accu 

E88C FHA X=-register naar Stack 

EB8D TA Y-register naar Accu 

E88E FHA Y-register naar Stack, 

ESSF CLD clear Decimaal vlag 

EB90 JSRHEBIF test resultaat-register 

E89 PLA haal Y-register 

E894 TAY zet terug 

E895 PLA haal X-register 

E896 TAX zet terug 

E897 FLA haal Accu van Stack 

E898 RTI einde interrupt. 
Interrupt Request Routine. 

E89 JMP (HOODS) spring naar het adres wat staat op 


de geheugenplaatsen HOODS & #OOD&. 
De RET-vektor, 


De inhoud van de RST-vektor (RFFFC & #FFFD) is het startadres van de 
RST-routine op HFFZF, welke weer een vekloradres in RAM heeft op adres 
#OZO2 Kk ROZOE (laag-hoog). Dit RAM-vektoradres wordt tijdens de 
KST-routine geladen met de inhoud #C9D8 … 

De RST-pin is binnen de ACORN ATOM aangesloten op de BREAK-toets, VIA 
6522 en de ACIA 8255, Deze lijn wordt door de BREAK-toets laag gemaakt 
zodat de uP6502 gereset wordt. Door de RESET-routire op #FF3F gebeurt 
het volgende. 





FFF LDX D#17 laadt X-register met wen index 
FF4i LDARFFSA, X laadt een veckorbyt 

FF44 STAHO2OA4, X brenq deze naar vero-page 
FF47 DEX verlaag index 

FF48 BPLAFF41 alle vektoradressen qehad? 
FFA4A TXS5 X=HFF op Stac 

FFAK TXA Accu = HEF 

FF4C INX XE 

FFAD STX#EA zet DOS/COS op nomon 

FF4E STX$E1 zet cursor uit 

FFS STX$E7 zet lock uit 

FFSS LDX DHES laadt index 

FFSS5 STA#OZER, X zet array adressen up Ù 

FFSB DEX verlaag index 

FFS59 BPL&FFSS alles op O 

FFSB LDA @#0A laadt een lineteed 

FFSD STA#FE zet weg voor printerroutirie (&FFO4) 
FFSF LDA D#8A laadt poortinstelling 

FF61 STA#BOOT stel poorten ACTA in 

FF64 LDA D#07 taadt paortinstelling 

FF66 STA#ROO2 stel poort ACIA in 

FF&9 JSRAF7D1 schrijf ACORN ATOM op het scherm 


FESC-FF7E tekst + kontrolekodes 
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FFJC LDA 9482 laadt text-pagina 
FFZE STA #12 stel teit-page-pounter in 

FFBO CLI reset interrupt-vlag 

FFB1 LDA #55 laadt kontroie karakter 

FF83 STAHZ9OL zet deze in het geheugen 

FFB6 CMP#29C kontrole of het erin at 

FFB% BNERFFS: staat niet ded geh: 

FFSE ASL vermenigvuldig kontrolu: arakt 

FFBC STAREPEL zet het er nog gen wee Ln 

FFBF CHER2ICH dubbele kontrole op geheagen 

FF9E HNESFEST soring ais er geen ge 

FF24 IMFACZEL kextpointer op #2900 ga 

EFS JME#C2EG textpoinker op #8200 in 

FFSA-FFEL bevat veltoradresnm:n va . 





Op #CIDS start de BREGE-ROUTINE. Vie de velt aren zt in 
we hier aangekomen. tetement=pointer wordt met 
een jump naar de interereteer-rcutine wardi ce daar 





staat, uitgevoerd. 





GSD8 PLA haal prat 

ENDS PLA haal lage oyte 

CIDA STAHDD set deze weg al 

EPD LDAH1O laadt lage byte errum-bamntler 









TIDE STAHOS zel deze maar Lt vainter 
CSEG LDAHIL laadt huge byte arre ze 
C9EZ STA#DA zel deze naar statement weinter 
CREA JMPHC2FD interpreteer reqel 
GEB-CA2E Heli. 6687" "ER Et EPRFPEE: 
De volgende vuutine kijkt ven FE wanwe 
CAZ4 IJSRHCAZA kijk FF aanweziy 
EAZ7 BEC#CAFZ niet aanweuig ervan 
CAES_ JHP (RDOOA) ga doot met het adres in de FF. 


De IRd-vektor. 





De inhoud van de  IRG-velktor (HFFFE & HEFFF) ie het  etartacrt 
IRG-routine op #FFR2, welke weer een vektoradres in RAM heeft dp & 
BOZOA & BOLOE (laag-hoog). Dit RAl-vekturadr wordt tijdens d 
RST-routine geladen met de inhoud HOOG 

De IRG-pin is binnen de ACORN ATOM aangesloten ep de VIA & 
EZ net boven dit IE, FLS via LES en op FL&/7 op pin 28. 

Deze lijn kan door an deze Jaag gemaakt worden zodat de uP&S0z 
gaat zoeken via de vektur naar de IRG routine up #FFEZ. 




































FFEZ STAAFF zet de accu veilig 
FFE4 PLA al processorstatus van Stack 

FFES PHA set hem terug op Stach 

FFEG AND DHO kijk of de Break-vlag is gezet 

FFB8 ENERFFCO niet gezet dan naar interrupt-routine 
FFEA LDASFF haal de accu inhoud terug 

FFEC PHA zet up Stack 

FFRD JMP (H0204} naar interrupt=routine 

FECO LDAAFF haal de accu inhaud terug 

EFC2 FLP haal pracessorstatus van Stack 

FFCE FHF zet terug op Stack 


FFCA JUF (ROZ0 





ga naar foutmeldings-rouutine. 
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Heers bert dip: 
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TOEK 


Ofwel hoe ík een Atom verbouwde. Uit het leven gegrepen door 
Henk van Galen. 


Een tiid geleden besloot een vriend van mij, die ik verder aan 
zal duiden als Toek, over te gaan tot aanschaf van een Atom. 
Zijn bedoeling was, deze machine intensief als textverwerker te 
gaan gebruiken. Hij verzocht mij dan ook, het tamelijk kale 
Atoom voor dit doel op te tuigen. Het resultaat van mijn bloed, 
zweet en tranen draait nu enkele maanden tot tevredenheid van 
Toek (en diens echtgenote, zie Atom Nieuws 7-85, pag.4). Omdat 
aij het Toekatoom ook voor anderen niet oninteressant lijkt, zal 
ik proberen in de komende tijd de aangebrachte wijzigingen te 
beschrijven. 


Wat wilde Toek allemaal: 

=1. Ruisvrii plotten, i.v.m. de textverwerker; 

-2. RAM eenvoudig en goedkoop uit te breiden tot #8000; 
eprom op #1000; 

=3. Printerinterface met achtste databit, 
dat zonder softwarekronkels aanwezig moet zi ins 

=4, Een snel en betrouwbaar cassette-systeem, 
dat bii opstarten beschikbaar moet zi in. 


In deze aflevering zal ik een beschrijving geven van de wijze, 
waarop ik aan wens 4 heb voldaan. 


Voorop stond natuurlijk het invoegen van de in Eikeltje en Atom 
Nieuws beschreven cassette-interface. Dit simpele printje doet 
wonderen. Zelfs het jengeldoosje dat Toek nu als "datarecorder“ 
gebruikt, slikt zonder moete 4800 baud, zowel door Jengeltie 
zelf, als door andere recorders opgenomen. 

Daarmee zitten we meteen in de software. 4800 baud betekent 
naturlijk MJCOS. Maar dan. MJEOS biedt ten opzichte van de 
originele COS enkele faciliteiten meer, maar offert daarvoor 
iets ap, dat miins inziens wezenlijk is, namelijk de 
aanspreekbaarheid vanuit — om het eenvoudig te houden — 
utilities als EDIT en CALC. MJCOS vertikt het namelijk om de 
betreffende vectoren te gebruiken. Martin Janssen bevindt zich 
hiermee overigens niet in slecht gezelschap: ook de 
priizenswaardige MDCR-rautines van Arie Marchal gaan hun eigen 
weg. Het zou nu te ver voeren in te gaan op voors en tegens van 
het omzeilen van de vectoren. Ik wil volstaan met te melden, dat 
in Toeks geval de originele routine te omstachtig in het gebruik 
bleek. 


De door mij ontwikkelde variant maakt gebruik van de vectoren 
SAVVEC, LODVEC, BPTVEC en BGETVEC, en kent derhalve dezelfde 
opdrachten als de originele COS, dus cok commando’s als BPUT en 
BGET en familie, Bovendien kunnen vanuit EDIT files 
weggeschreven en geladen worden met < en >. Hiervoor heb ik de 
mogelijkheid, de snelheid in te stellen, laten varen. Een 
verschil met de Atom-COS bestaaat, naast zichtbare save- en 
laadindicatie, uit een BBC/Electron-achtige catalogusweergave: 
slechts een regel per file. 
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In Toeks machine zit een FLP-ROM set het *standaard" 
driewegwissel. Zodra Toekie iets tegenkomt dat hij niet herkent, 
bijvoorbeeld alleen maar een return, of een vreead commando, 
steekt hij zijn licht op op #1000. Daar staat,o wonder, #40,8BF. 
Vervolgens kijkt Atoompie of SAVVEC al veranderd is. Is dat zo, 
dan gaat het zoeken gewoon verder op #A000. Overigens is het een 
koud kunstje, hier te zijner tiid een SOS in te voegen. Als de 
vector niet is verzet, doet het systeem dit alsnog en meldt zich 
met “"ET-COS 1,0" (wat commodoorders kunnen, kan ik ook). Dan 
wordt een raatest uitgevoerd (het lijkt wel een IBM...), waarna 
het eerste niet beschikbare adres (maximaal #3000), op het 
schera verschijnt. Vanaf dit moment staat 4800 Baud ter 
beschikking. 


Zoals de aanduiding al doet vermoeden, betreft het hier een 
eerste versie, die nog lang niet failsafe of foolproof is. Met 
name de actie op ERROR 6, gevolgd door SFLOAD, is niet mijn 
hoogste intellectuele prestatie (is netjes voorz is een 
puinhoop). Houdt moed, versie 1.1 is in aantocht. Bovendien 
heeft Toek hier tot nog toe (enkele maanden dagelijks en 
langdurig gebruik) geen zenuwkwaal aan overgehouden, om de 
eenvoudige reden dat ERROR 6 hoogst zelden voorkomt. De snelheid 
van de routine maakt het overigens weinig hinderlijk het laden 
volledig te hervatten. MAAR HET BLIJFT FOUT, VAN GALEN! 

Het programma is van een beknopte toelichting voorzien (die zal 
in 1,1 ook netter worden). Mochten er echter nog vragen blijven, 
dan leen ik U graag een oor. 

De source is geschreven in SALFAA 1.5 en is ongeveer «xk lang. 
In het begin wordt STTAB geladen. Dit is — even een zijstraat — 
een STandaard TABel, die ik uit Bram Poot’s SYMBAS gesloopt heb, 
en die mijn onafscheidelijke bondgenoot is geworden. Misschien 
ook de Uwe? 


Zoals al gezegd, voor vragen en opmerkingen kunt U altijd 
terecht. Tot dan of tot de volgende aflevering, 


Henk van Galen 


RED: AANGEZIEN DE LISTING BIJNA & BLZ LANG ZOU ZIJN IS AFGEZIEN 
VAN PUBLIKATIE. DE SOURCE IS NATUURLIJK WEL IN HET BANDJES- CQ 
SCHIJVENARCHIEF. DIT GELDT OOK VOOR STTAB. 


Bronnen: 


-1. Janssen, M.: micos, een 9600 baud cassette operating system. 
Acorn Nieuws árg.2, nr.5, pgg.19 ev.s Id. jrg.2, nr.6, pag. 17 
en 18. 

-2. Visser, G. en E. van Schothorsts micos en progranaer 
troubles. Atom Nieuws jrg.4, nr.b, pg. 25. 

=S. Bastings, H. en B. Tossaint: cassette-problemen en 
mogelijkheden. Bronsgroen Eikeltie nr.5, 1985, pg. 4; Atom 
Nieuws irg.4, nr.6, pgg.21 ev.s Idem irg.4, nr.7, pag. 25. 
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Het programma SCHRIJFBLOK is een vreemd programma . Het is 
ontstaan wit de behoefte om op een gemakkelijke wijze 
tekstpagina’s te maken , zoals bijvoorbeeld een handleiding voor 
het gebruik van onze ATOM of enkele bladzijden uitleg over 
bepaalde software ‚ die dan op een zo snel en eenvoudig 
mogelijke wijze moeten kunnen worden “doorgebladerd” … 

Het is me redelijk gelukt ‚ misschien kunt U er cok iets mee 
doen , vandaar deze publicatie … 

Het programma ‚ waarvoor P-CHARM (hebt U die nu nog niet 2} 
benodigd is wordt geladen op #2900 en gebruikt geheugenruimte 
tot #4000 . Het aftasten van het toetsenbord , wissen van 
teksten en dumpen op de printer is ín machinetaal geschreven … 
Bij het "runnen" van het programma worden deze routines direkt 
in het geheugen (achter de basic) ge"poked" Vanaf #4000 tot 
#8000 (zonder een IGK-kaart zou dit programma zelfs niet zinvol 
zijn!) heeft U 32 tekstschermen ter beschikking „ een redelijk 
aantal,lijkt me! 

Aan de hand van een iets uitvoeriger beschrijving van het menu 
wordt de werking hopelijk duidelijk … 


Opstarten 3 

Het programma begint met een geheugen"check" van #4000 — #8000 
op eventueel aanwezige tekst en geeft dit in de kop weer . Is er 
tekst aanwezig dan kan deze op verzoek worden gewist . De 
tekstbuffer wordt in dat geval aangepast aan deze tekst . Is er 
geen tekst aanwezig dan wordt ook hiervan melding gemaakt en om 
bufferruimte , in de vorm van tekstPAGINA’s ( bijv. #70 tot #80 
) gevraagd …. Het programma springt hierna naar het …..… 


MENLI 

Het menu geeft U naar keus de gewenste procedure en er wordt na 
afhandeling of in geval van "error" { verkeerde input , Uw fout 
dus! ) altijd naar het menu teruggekeerd . Op vitate momenten 
kunt U in het menu terugkeren door "m" ( = shift "M" } te kiezen 


SCHRIJVEN z 

Het menu vertelt U in antwoord op deze keuze welke paginanummers 
ter beschikking staan en vraagt vanaf welk nummer U tekst wilt 
gaan maken . Na een return wordt het scherm geveegd , het 
paginanummer en de tekstindicator ( pijltje naar links ) 
verschijnen op het scherm en de cursor gaat naar linksboven . U 
kunt nu het hele scherm voltikken . Bij de laatste regel wordt 
de returntoets uitgeschakeld om scrollen te voorkomen echter de 
cursortoetsen blijven in werking zodat scrollen niet uitgestoten 
is en Uw tekst dus eventueel toch kan worden verminkt , 
voorzichtig dus . Aan het einde van de laatste regel wordt U een 
halt toege"beept" . Er zijn nu twee mogelijkheden : 1) type "©" 
en de tekst wordt in het geheugen opgeslagen en de volgende 
pagina verschijnt . 2) Druk de “delete"-toets en met behoud van 
de tekst gaat de cursor terug naar linksboven sodat U correcties 
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kunt aanbrengen . Is de buffer echter vol dan komen we terug in 
het menu . Opnieuw schrijven activeert de tekst “buffer vol!” en 
de zaak ligt plat , mits U gaat ……….- 


UITBREIDEN z 

Bij volle tekstbuffer of een bii nader inzien te beperkt 
apgegeven bufferruinte kunt U na deze keuze de buffer uitbreiden 
met een door het menu opgegeven maximaal aantal nog beschikbare 
pagina’s … Daarna kunt U het schrijven weer “hervatten”. | De 
grens van de bufferruimte wordt bepaald door het adres #85000 het 
beeldschermgeheugen dus … Het maximaal mogelijk aantal 
tekstpagina's bedraagt dus (#8000-#4000)/512 = 32 . 


BLADEREN : 
Hiermee kunt U uw teksten , voorzover aanwezig doorbladeren …. U 
kunt met "mp" naar het menu ontsnappen … 


WIJZIGEN : 


Een bladzijde tekst kan worden gewijzigd via deze routine . Na 
de wijziging vindt vernieuwde opslag in het geheugen plaats en 
keert het pragramma terug naar het menu … 


Het menu vraagt naar de naam van de tekstfile , laadt deze en 
geeft in de kop de grootte van de file weer …. Denk eraan dat de 
buffer aan de tekstfile wordt aangepast , ze wordt dus 
onherroepelijk gewijzigd … 


OPBERGEN : 


Met deze keus brengt U de tekstfile naar diskette . Mensen die 
geen DOS bezitten dienen de instructie LINK#E9OO uit het 
programma te verwijderen … 


PAPIER : 


Een bladrr=routine met printerdump « Vanaf het gekozen 
paginanummer verschijnt de tekst op het scherm , een druk op een 
bijna wiltekeur;ge toets verzorgt een dump van het scherm naar 
de printer en “r wordt meteen doorgesprongen naar de volgende 
pagina … 1} kunt met "m" naar het menu ontsnappen … 


Indien U met "SCHRIJFBLOK" een tekstfile heeft gemaakt van 
bijvoorbeeld za beeldschermpagina’s in geheugenruimte 
#5000-#3000 „ dan kunt U deze gehele tekst doorbladeren met 
bijvoor geeld or derstaande ONE-LINER : 


19 g=&S" 00: 90 CIPY GQ, (0+512) , 88000; INKEYK; D=04 523 U. O=BOOOGE. 
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10 PROGRAM schrijfblok 
20 REM J.BRONZWAER (ACL) 


40 REM gew.scanroutine 
50 S5=#35F00;S!O=#CHFFES20 
&0 S!'4=#20FGFOOD;S!B=kLOFFF 4 


30 REM wisroutine 

GO W=t3F 10; MW! O=#B5OSSTAD; UW! A=#8400A0Ï 1; WI BHD IFFAPDO 
100 W!'12=8F9D0CBPO;W! 16=#PLASIIEG 

110 W!20=KDOO3SECD; WI 24=8FF6OFO 


130 REM printerdumproutine 

140 H=#3F505H!O=#P0B40OAO;H! 4=#918500A9;H! BWF 4201509 
H! 12=#2002A9FF ; HI 16=41BA9FFF 4; HI 20=#AIFFF420 
H! 24=REFFA204D; H! 28=#F42008A9;H! S2=#30FOBIFF 
38604902; H! AO=#FB2020E9; H! 44=#20COCBFE 
91 20EFDO; H! 52=$20EADOSF ; H! SA=HED2OSFS 1 
190 Ht 6O=4CIILASFE: HI &A=KZODEDO82; H! GB=#5OLF7D1 
200 H!72=#B1CB5OEA; H! 7b=WFO20CFO5; O=#FOSBCIF 
210 H!B4=#FOODCHOB;H! B8=#485EAIO7 ; 2=#2026C48 
220 H! 6=#55189B50; H! 1002870708590; H! 104=HA0P1EGO2 
230 H!108=#6000 

240 

250 PROC MENU 

260 V=#81FC:P.$12;KOP; TEKST; CONTROLE; ON ERROR MENU 
270 ?7=0; DOP. $1725U.C.=51 















280 P.””“1. SCHRIJVEN. 5. LADEN. ”” 
290 P."2. UITBREIDEN. &. OPBERGEN. "” 
300 P."3. BLADEREN, 7. PAPIER. *” 

310 P.“4, WIJZIGEN. B. STOPPEN. ""” 


320 77=0; DOP. $172;U.C.=31;P." "5 PREL=#BO 
330 P. "UW KEUZE 7"; INKEYK;CASE K OF 

340 <CH"1">P. 1"? $ SCHRIJVEN 

350 <CH"2">P. 27" ; UITBREIDEN 

340 <CH“3">P. 3" ; BLADEREN 
"P.A * 3 WIJZIGEN 

>P.57” LADEN 

>P. 6” ” OPBERGEN 

400 <CH"7">P.7"* ; PAPIER 
410 <CH"8">P,B"*;P. "BYE!" 
420 CEND;BE. 19, 20; MENU 
430 PEND 

440 

450 PROC KOP 

460 ?4E1=0;P.$30$128"schrijtblok"$128” 

470 P.$128$138$138"bz2"$141"sott"$13881588128° 

480 PEND 

490 

500 PROC GEENTEKST 

510 Y=Z;VTABO;HTAB14;P. "GEEN TEKST"’sHTAB14;5 FP. "AANWEZIG 1977 
520 PEND 

530 

540 PROC TEKST 

550 Y=#3FO0OsDOY=Y+#1 005 Q=Y+50 














FY=#8000: GEENTEKST 3 FEND 
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S&O UNTIL G?0z8iF AND GPi=820 

570 VTABO;HTAB14;P. “BEGIN TEKST: #"&Y 

580 Z=V-#200; DOZ=Z4#200; Q=Z+508; U. QPOC>HIF OR OP1CR20 
590 VTAB1;HTAB14;P. "EINDE TEKST: @"“"&Z’ ” 

&00 PEND 

&io 

620 PROC CONTROLE 

630 L=tE-B)/2 REM LAATSTE PAGINA VAN DE BUFFER 
640 FelZ-Y)/512+1;3REM EERSTE VRIJE PAGINA ACHTER DE TEKST : 
&50 U=(#80-E)/2 ;REM AANTAL PAGINA'S EINDE BUFFER TOT #8000 
660 PEND 

670 

480 PROC NUMMER 

690 BE. 17, 103 V?O=#1F; V?1et20 

700 V?2e#304P/10; V?I=8SOHP-108 (P/10) 

710 PEND 

720 

730 PROC TYPE 

740 IF?#DF=#BO; LE. #FFEG; 6. 740 

750 IF?ADESHEO;LI. #FFEG;G. 750 

750 IFPWEOSHID;LI.S;6. 760 

770 BE.3O, 105 V F;V21=#203 INKEYK 

7809 IEK=#7EP. $350; VP 1=#20; TYPE 

790 IFKC>4SE;G. 770 

800 PEND 

B10 

820 PROC SLA-OP 

830 BE.40,20;Q=(B-24F 42) €256; COPY#GOOG, BELFF,Q 
840 PEND 

B50 

840 PROC HAALOP 

870 G=(B-24+P82) $256;R=0+508; IFR2OC>41F ; MENU 

880 COPY @, (Q+51 1), #8000 

890 PEND 

200 

910 PROC SCHRIJVEN 

920 IF F>L;P.-$128"butfer"$128"vol”"$129; BE. 50, 505 PA. 50: MENU 
930 P. "BLANCO PAGINA'S : “F“ T/M “L’ 

940 IN. "SCHRIJVEN VANAF z "P;IFPS1 OR P>F3MENU 
950 P=P-1;DOP=F+ 1; P. $12; INKEYK; EFK=#6D; MENU 

960 P.$12; NUMMER; TYPE; SLA-OP; U. P=t ; MENU 

970 PEND 

980 

990 PROC UITBREIDEN 

1000 P. "HOEVEEL PAGINA'S (MAX.“UT) * 

2010 IN.XsIFXS1 OR X>Us MENU 

1020 E=E+X£2; MENU 

1030 PEND 

1040 

1050 PROC BLADEREN 

1060 P."*VANAF PAGINA ";IN.P;IFF<1 OR P>L;MENU 

1070 P=P-1;DOP=P+1; HAALOF; INKEYK; IFK=#6D; MENU 

1080 UNTILP=L ; MENU 

1090 PEND 

1100 

1110 PROC WIJZIGEN 

1120 IN. “PAGINA “Ps; IFP<O OR P>L3 MENU 

1130 P.$30: HAALOP ; NUMMER; 2#B000=°2#8000+#80; TYPE; SLA-OP; MENU 
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1140 PEND 

1150 

11460 PROC LADEN 

1170 LI.#EOOO;P. "NAAM FILE 7“;LI.#CDOB 

1180 !'#C9=#40000140;3 LI. #FF69; PALISE 1 205 RUN 

1190 PEND 

1200 

1210 PROC OPBERGEN 

1220 L1-#E000;P. “NAAM FILE 7";LI.#CDOB; ?#C9=#405 ?4CA=#01 
1230 #CB=YL25b; PRET=Y/ 256; PRCD=PACB; PHCE=IRCCT 

1240 P$CF=?ACH; PUDO=PECCS PUD1=2L2565 PHD2=2/ 256 

4250 LINK#FAEO; MENU 

12460 PEND 

1270 

1280 PROC PAPIER 

1290 IN. "VANAF PAGINA"P;IFP<1 OR P>L; MENU 

1300 P=P-1t;DOP=P+13 HAALOP; INKEYK; IFK=#4D; MENU 

1310 LINKH;U, P=l 

1320 PEND 
1330 

1340 REM = 
1350 REM HOOFDPROGRAMMA 

1360 REM =: = 

1370 BE. 30,10; 3P. $123 KOP; TEKST 

1380 B=Y/256;E=2/2546; IFY=Z;G. 1410 

1390 P#E1=#80;P, "TEKST WISSEN (J/N) P's INKEYK; EFK<>74; MENU 
1400 LI,W;s RUN 

1410 P#E1=#8050.6. 1450 

1420 P."TEKST-BUFFER 7 *” "———_ "1 

14350 IN. "VAN TEKSTPAGINA "B; IN."TOT TEKSTPAGINA "E 

1440 IFBè>=#40 AND B<#7E; IFE<=#BO AND (E-B) >=2; MENU 

1450 P,* "foutieve" $128“invoer"$129°*;6G. 1430 








Het gebruik vän de 
Bchrijfblok ín de 
praktijk «esse 
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Uit, laat ik zeggen, onvrede met het bestaande systeem zijn er 
reeds allerhande fraaie zaken ontworpen zoals programma’s, 
EPROM’s, schakelsystemen en hardware. 

Merkwaardig genoeg Jijkt er maar weinig gedaan te zijn aan de 
Cxxx= en Fxxx-ROM. 

Ten behoeve van het CX-systeem wordt er een kleine wijziging in 
de F-ROM aanbevolen. 

Weg standaard Atom! 

In Atom Ware (deel 3, blz 16) beschrijft Henk Reinders een 
aantal "Software-rariteiten", Verdere publicaties over de F-rom 
kan ik mij niet herinneren. 

Bij mijzelf heb ik reeds een paar dingen veranderd. Om de 
printrautine te versnellen heb ik tweemaal de wachtlus 
(JSR4FEGB) in de routine vervangen door NOPjes. 

Het is ook een kleine moeite om de fout bij ERUN"* (zie Atom 
Ware) te verhelpen door de relatieve sprong op #FA25 met 2 te 
verhogen. Na het laden van een verkeerde file wordt nu bovenop 
een nutletje gesprongen, met, naar ík aanneem bekend resultaat. 
Nogal vervelend vond ik de eeuwige piep op de cassettepoort. Dat 
is nu verholpen. Er is alleen nog een piep tijdens het indrukken 
van de BREAKktoets en tijdens COS-gebruik 

Andere zaken moet ik nog een rustig bekijken. 

De voor wijziging eventueel benodigde extra bytes kunnen komen 
uit de “rariteiten” of uit het verkorten van woordjes als ACORN 
ATOM, PLAY, RECORD, TAPE, NAME, COM enz. 

Een groot stuk kan in de reset-routine worden vrijgemaakt ( op 
#FF7C). De aldaar gepleegde geheugentest dient alleen een 
verkoopargument (kale Atom) en is eigenlijk nogal onzinnig. 

De te wijzigen BK-PROM zit in IC-voetje 20 en is pen-compatible 
met de 2564, 

De 2564 heeft wel 4 pootjes meer, maar die hoeven slechts aan 
de plus en min vast te zitten. 

Bovenop de 2564 kun je een paar draadjes solderen; 


CS1 en CS52 (pootje 2 en 27) aan massa (pootje 14 ) leggen. 
Vpp en Vcc aan Vee (pootje 1, 28 en 26 aan elkaar). 


Dit geheel in IC-voet 20 steken, zodanig dat de pootjes 1,2,27 
en 28 naast de voet in de lucht blijven hangen. 


256h 
Tr 


IC 20 voet 








ham 
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Aansluitingen Eprom 2544. 


1 
2 
3 
4 
5 
& 
7 
8 
9 


Vss 





6.s; 


KKEKKEKEEEEL EEE REE EEE EE 
tit Fxxx-wijzigingen £%% 
KAAREKKEEERKE EEE EEE EKE LE 
&s COPYKFOOORFFFF#&7000 

7 REM Atomware 3 Blz 16 (XRUN"") 
B PEPA26=H02; PHF GA; LC 
G\rstroutine;LDA®4\weg piep 
101F=#9F7C; LNOPs CLI ; JMP#C2B2 
1l\deze nopjes zijn nog vrij 
12NOP; NOP; NOP; NOP; NOP; NOP 
13NOP ; NOP; NOP; NOP; NOP; NDP 
1ANOP; NOP ; NOP; NOP; NOP; NOP 
1SNOP; NOP ; NOF ; NOP ; NOP ; NOP ; NOP 
1&83P=#9B95; [\natcat piep uit 
17STA#CI;LDA@RLOE STARC2 
18BIT#BOOI ; BPL#9BAF ; BVC#9BAF 
19JSRHFCBD; BES#IBI 5; DECHCS 
ZOBNE#SB9B; DECHC2; BNE42B9 B 
Z1BVS#9BB4; JMP#FAGE 
22\einde(t)load:piep uits 
23P=#9951; LJMPHFAGB; 1 

24 P=#9A6B; CRORÉDD: PLP 
2SLDA@4; STARBOO2; RTS 
26\wachtlus weg uit print; 1 
27P=#ID5 51 CNOP; NOP; NOP; 2 
2eP=#9D45; CNOFs NOP; NOP; J 

29 END 


URUNm 


In Acorn Nieuws Jrg.3 No.7, blz 64 en 65 staan nog enkele F-ROM 
wijzigingen. 


Red: als U dan toch de F-ROM moet herprogrammeren volgen hier 
nog enkele tips van A. Marchal: 


De inhoud van #FDSF wordt 
#01, hierdoor wordt de Pagemode goed opgestart. 
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Assenbler foutmeldingen meer zichtbaar maken met kleine letters 

en met Line Feeds. 
FS14 wardt OA 
F515 wordt OA 
F516 wordt OD 
FSE) wordt 73 
FSi8 wordt 70 
FS19 wordt 72 
FSIA wordt 6F 
FSIB wordt GE 
FS1C wordt 67 
FSID wordt 66 
FSIF wordt &F 
F520 wordt 75 
F52i wordt 74 
F522 wordt OA 
FS25 wordt OD 
F524 wordt B4 


… rt HOIC TIDE: ee « 


Overgenomen uit oude publicatie van A-Marchal. 


Zit U echt in de put 772 


Kijk dan eens op de &chter- 
pagina, 

Daar staat vast wel een 
Adres bij van Llemänd die 

U eruit kan helpen. 
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Wilt u lid worden van de ATOM COMPUTER CLUB. 


Neem dan contact op met de penningmeester van de regio waar u 
bij ingedeeld wilt worden. Hij kan u vertellen waar de 
regiobijeenkosten zijn en wat u als lid kunt verwachten. 


Regio NOORD: 
D. Uuldriks Wiemers 14 9642 KG Veendam 
05987-19611 


Regio OVERIJSSEL /GELDERLAND: 
N. van Wijnen Korte Dreef 12 83582 B5 Emmeloord 
85278-15583 


Regio TWENTE: 


W.Buning Kieskamp 1 7783 EB Gramsbergen 
05246-1831 . 

Regio NOORD-HOLLAND: 

P. van Kuik Zuideinde 54-a 1843 JP _Groot-Schermer 
2997-1902 

Regio DEN HAAG: 

Th. Waayer Lt. Couperusstraat 6 2274 XP Voorburg 
B78-B62504 


Regio DELFT: 
F. von Morgen M. de Ruyterweg 21 2628 BA Delft 


Regio ROTTERDAM: 
R. de Haan Brasem 125 2986 HA Ridderkerk 
21803-25160 


Regio CENTRUM: 
P‚ van Mourik Ruiterstede 68 3431 XN Nieuwegein 
83402-48781 


Regio ARNHEM: 
J. Hartog Keyenbergseweg 63 6871 WK Renkum 
28373-13757 


Regio Zeeland: 


E. Gijssel Dorpsstraat 86 4424 CZ Wemelding 
O1192-2121 

Regio BRABANT -OOST: 

P. Ehrlig Roostenlaan 266 5644 BS Eindhoven 
8490-114183 


Regio LIMBURG: 
A. van Zantvoort Mozartstraat 328 6844 RS Roermond 
24750-21797 


Regie BELGIE: 
R. Leyssens Oude baan 127 3550 Heusden Belgie 


Eventueel kunt u de contributie rechtstreeks overmaken per bank 
of giro aan de Atom Computer Club te Groenekan. Vermeld echter 
uw volledige naam, adres en de REGIO waarbij u ingedeeld wenst 


te worden. 


